REVIEW: QL 
| PLAYWRIGHT 


“Soft option 
for scriptwriters | 


%, 
t | 


M MN | 
at 

| Sa! aes 

¥ ane 

1 . i, 


ees : Y as 


R Every month £1.75 October 1989 » 


ll aly m & \ if 
a ; oR 
" : ih 

; ' it 

q it 


Dreamlands 


SUPERBASIC 


File searching — 


Yad into chaos 


Sector Software 


The best programs and peripherals for the QL 


Page Designer 2 
This is a full feature desktop publisher that has to be seen to be 
believed. Ask for full details of this system and its support pro- 
grams. £35 


Phillips CM8833 Colour Stereo Monitor 
Astereo monitor for the QL, Amiga, ST or almost any com- 


puter 
£260 


QZ/QL to Z88 file transfer 
Software and cable to connect the Z88 and QL and transfer 
any files between them. Includes Archive to Pipedream and 
back conversion routines. £ZS 


Spellbound 
A spelling checker that checks your spelling AS YOU TYPE. 
Based on a 30,000 word dictionary, works with Quill or The 
Editor V1.17 onwards on the expanded QL.” £30 


MDV Cartridge Doctor 


Rescues corrupt files and microdrives £13 


Taskmaster 


A brilliant multitasking front end system which lets you use the 
QL as a serious machine. Multitask many programs at once. 
£25 


| LC10 printer £229 
LC10 colour printer £274 
LC2410 printer £374 
QL Service Manual £25 
Keyboard membranes only £6 
ZX8301 ULA £12 
Microdrive cartridges £1.90 
3.5" DSDD disks £1.25 
Massive reductions in Z88 prices! 


Z88 Computer Was £287 
Now £230 


Write Turn 


Turn spreadsheets and documents on their sides with this 
excellent utility, works on Epson and compatible printers 


£12 
QL World Index 
A complete index to the contents of QL World from its start to 
May 1988. Find articles and reviews in seconds, 160K+ of data 
compressed to fit into a 128K QL £6 


Flashback 


A very fast and slick database which has very few limitations. 
Will also convert Archive files. £25 
Flashback Special Edition is a greatly advanced version with 
lots of extra featues including report generator, mail 
merge, label printing etc. £40 


Z88 Allin one kit: 

Z88 computer, 128K RAM,Mains Adaptor, custom Carry case, 

Batteries, User Manual Was £329 
Now £287 


If you are not receiving our free QL catalogue 
just send your name and address and we will 


include you in future mailings 


Touch Typist 
Excellent typing tutor that works. 200 lessons , graph of your 
progress, adjustable difficulty levels £12 


Ferret 
Find lost files fast with this file search utility which will read all 


your files on disk or mdv looking for a match with your search 
text. £12 


STD Index 
This index to all the dialling codes in the country executes 
from disk in 15 seconds. Know the place and it will tell you the 
number, know the number and it will tell you the place! (Ex- 
panded QL only.) £12 


MOTT SoETARE SALON TANDATA 
Features include fyl| RSo4o 9 them 209) OM 


answer, Preste| s/w, BT a 


SO don't mi Pproved. Th , autodial 
ORDER NOW; Out on the comm ea NORMALLY COST r29 


when you buy 
he price of one! 


(well, almost), 


ey = @ Sector Software 14 


39 Wray Crescent, Ulnes Walton, Leyland, Lancs PRS 3NH 
Tel 0772 454328, Fax 0772 454680, Prestel Mbx 772454328 
All prices include VAT and P&P 
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NEXT 
MONTH 


QL ARTIST OF THE 
YEAR 
COMPETITION 1989 


Software prizes for the creative. 


MORE ROM BUGS 


Including some fixes and new 
bugs on the scene. 


PC CONOUHROR 
PC CONOUBROR 
PC CONQUKROR 
PC CONOUKROR 
PC CONOUBROR 
PC CONOUBROR 
PC CONOUHROR 
) PC CONOUBROR 
PC CONOUHROR 
PC CONOUBROR 
PC CONOUBROR 
PC CONOUKROR 


PC CONQUEROR is the amazing Accelerated PC Emulator by Digital Precision Ltd. Since we 
completed SOLUTION a year ago, we have been working unceasingly to build an all-new 
software-based system ~- a complete rewrite from scratch - that was very significantly 
FASTER. This has now been accomplished. PG CONQUEROR has every single feature and 
advantage of the much-acclaimed SOLUTION (full MDA/CGA graphics compatibility, QDOS<>DOS 
bidirectional file transfer, multitasking, | supervisor mode, configurability, 
key-redefinability) PLUS improved PC compatibility (we know of NO commercially marketed PC 
programs that don't work under PC CONQUEROR, and we've checked hundreds), increased 
availability of memory to MS-DOS (481K on a 640K QL), many exciting new functions 
(dynamically adjustable screen priority, direct keyboard access, new supervisor features, 
all optimisations pre-configurable etc), better manual and GREATLY ENHANCED SPEED, 80% 
faster than its predecessor with very many PC programs! Even 1/0 operations, whose speed 
is largely hardware-dependent, have been made zippier: formatting a DSDD PC disk (allowing 
for the same 85 sec QL pre-format in each case) takes 123 seconds with PC CONQUEROR vs 202 
seconds with SOLUTION; MS-DOS boot-up time is down to half a minute (from Miracle hard 
disk - twice this from floppy). PC CONQUEROR's feel and smoothness are both far superior 
to SOLUTION's, so "perceived" speedups are even greater than stopwatched ones. 

PC CONQUEROR costs only £89.95. PC CONQUEROR PLUS comprises PC CONQUEROR + very latest 
v4.01 MS-DOS/GW-BASIC + complete Microsoft documentation: the total price is £139295* 

At the top-of this page is a list of the twelve best PC Eaulators for any conputer. SOLUTION users may upgrade to 90 COMMMIKMR (return only the 
SOLUTION nanval#disk, HOT any Vicrosoft disks or manuals) for £59 unlit 21.10.89 - thereafter se revert to the normally-calculated charge of £60 
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THE SOLUTION PC EMULATOR 


Put quite simply, THE SOLUTION automatically transforms your QL 


into an IBM PC clone capable of running those famous-name 
programs you've heard of so often. THE SOLUTION operates solely 
from software - there is nothing to plug in or disconnect, so 
you can still run all your QL software. It works this way. B 


up with THE SOLUTION disk. 


You are now in a@ PC, and you will be 


Prompted for insertion of an MS-DOS disk (just as you would on 
a PCy. End of story. Forget you have a QL, and run your P 
programs (obviously we read/write direct to PC disks 


Restrictions are virtually non-existent, as we support. both 


monochrome and colour CGA graphics, and run ALL the ben 


hmark 


including 
470K available on a 640K Q 

e than you will get on your PC or XT 

EDITION. 


PC software, quite a few that won't run ona 


UK clone! You have setup, 
with TRUMPCARD - mc 


improved by using LIGHTNING SPECIAL 


is further 


You can go further with SOLUTION than with a PC. You can 


multitask two or three PC programs, or run a PC program at the 
same time as any number of QL programs. You can convert files 
directly between QL and MS-DOS formats (either direction at 
speed. You can re-configure your QL keyboard at leisure, 

that you use keys of YOUR choice rather than chosen by 
the author of the application program You acce at 


run-time to a powerful diagnostic supervisor mode. SOLUTION can 
even run other operating systems - CP/M-86, p-system, etc. 


SOLUTION is available in two flavours - buy the CHOCO 


SOLUTION unless you have legal access to a copy 0 3-DOS 


LIGHTNING SPECIAL EDITION 


LIGHTNING 


Here are 3 good 


ways to make things zip onto the screen three 
times faster: (1) Spend £1,500 on a THOR XVI (2) Spend £700 on 
an ST Qt Emulator (3) Spend under £50 on SPECIAL LIGHTNING, 
which accelerates Q text printing, graphics and maths by mind- 
blowing factors, w 


hout compromising compatibility an iota. It 


is very simple to use - plug in a ROM and go, basically. If yo 


want extra features, font-changers, channel-adjusters, smoothe 
scrolling, black holes on line. Std LIGHTNING is 30% slower. 


EDITOR SPECIAL EDITION 
EDITOR 


We j th + 
E R not t if prep r \ 
sa 4 but ar + 
ust mers - t t t w t ' % 
er f : 
d, ita , andw w r 
{ ent -defin f 
¢ t 


arisor ‘ . 
ME ; 
wer and r 
perati m . 
that you r w 
j hi t * 
r 2 fund ' 
R ar r r 
t, wher i Ww 
and-t a" W 
d w w ways w t r r » ie ’ 
ten awkwa « f r 
y t aster, 4 
t 1 i , R r j 
N tk w E 
jmer w W jet 
‘ WYG. B r 


Sinclsir/QL World October 1989 


PROFESSIONAL PUBLISHER 


DESKTOP PUBLISHER SPECIAL EDITION 
DESKTOP PUBLISHER 


produce high-quality pages 
and/or graphics you need one of our three DTP systems. 


incorporating text 


Fully WYSIWYG text and graphics page designers, 
n € ur r boxes, pixe ustification, cameo 
direct t Y> compreh graphics cap 
rting of ASCII files and Q screens, a generous supply 
»f fonts/brushes/symbols, font-editing, merging, indep 
sriable X/Y nification, EDITOR mpatibility and much more. 
PECIA EDITION, which has a higher hardware requirement than 
the standard J)ESKTOP, also has more powerful text-formatting, 
texture fill, larger windows, Quill LIS file compatibility 
with th f ty t commur ate via control codes and 
ransla tab » fast, 16x16 font-handling, multi-tasking, 
roved mar ntry, enhan jrawing ities and much 
re - addition all the >ature f the standard DESKTOP. 
R f N HER r a agu ) f ts wn, pr ding 
ny feat that £1000+ kage ack (in our opinion, the 
nly oo kage ut there th qual PRO PUBL HER 5 
PR ‘ 2) s the f f 
her tw rograms, pl « a f hape (w ean ANY 
z r x, r x slar, re-entrant, w ever), that can b 
ndepe 4 nd t linked (flow-thr 
wit ‘ m } pixel-accurat 
Kote T bY e-fr isag with Quill oO f 
; : Sr massive 192xl 32 with 
, nder tior jJually settable for each 
r " -t guides, ! ut templates, full 
SEX ty with the Smiling Mouse though we still th 
ra without any mouse!), aut grey 
nversions, nding/rot tretching, all é an 
> f ter t dimensior sp fiable 
m 48x48 K€ t 960x1 . past to/from th 
2ge/EYE r i SBYTE ree : moothne and ntrol 
t r her g printer driver is 
tlin excellent one, with 
ty € ion t grafix, 
F 4 7 tha 
" r pu hers t 


it to be oth 


er than a 
ce to our publisher's 


powers! 


TURBO BASIC COMPILER 
SUPERCHARGE SPECIAL EDITION 
BETTER BASIC 


i h € r yntax of uperBASIC, the 2gendary 
r RG € r t the state of the art 
t a 4 tant-loading, stand-alone ng 
) tt w n pt ¢ nall r nar \terpr - 
aver J 3E achiev % RBO 5 ter 
NING F N in addition - th 
4 ¢ r our er and LIGHTNIN ar 
t tt r rre nte reter 
tr w mpilec +] ation t b witchable 
twe t r eec 
PER ; it maximum of 64k utput ode i 
xcludin 4 nd r parameter by 2 
€ é he r ior RBO alor w 
r " 3 directional mmunica r 
betwee ks, € ria ray r r funct 
twee t one tior f keywor ’ ach a 2 d 
rubber arrays, mf t datatype a wing integer 
r int r t ti. E R na QLS, more ™ 
Fy nfigurat kit, a upr el fr r 
front-end, able 16/32 bit ddr ng d mu much r 
4 + manua ! tr f ar ry te ' nt 
f r y writter - i er 
rant tr f, » and J - rr t ost rs. 
ve r ort wher ntentior ar r ar 
r your BASI r r ng, ar 
r J vi i ar rr ng t . 


DIGITAL C SPECIAL EDITION 
DIGITAL C COMPILER 


Ultra-fast, concise, multitasking, portable code, comfortabl 
exceeding the Small-C standard, and a ymprehensi and QDO 
library is what both these compilers share. Where possible, 
QL BASIC names have been used for ibrary keywords, with 


identical parameter requirements - this makes "getting into" 


either DIGITAL C very easy. Compared to Metacomco C, the speed 
of DIGITAL C is EXTREMELY gratify g - and the power of IGITAL 

is such that the whole compiler (parser, code-generator and 
linker) were all written in C and compiled by DIGITAL C Speed 
of compilation is stunning - DIGITAL takes 10 se nds to 
code-generate from a large intermediate file, where her 
products on the market take anything from 45 e nd to 45 


minutes. 


The SPECIAL EDITION goes much further than the tandard 
version, discarding the 64K code-size limit, provicing ng 
ponters, constants and integers, ving direct m/ a es t 
traps, adding new library ymmands, redoing old nes 
handwritten assembler, giving selectable 16/32 bit addressin 


The latest SPECIAL C provides support for Structures too! 


EYE-Q GRAPHICS SYSTEM 
ULTRAPRINT 

3-D PRECISION CAD SYSTEM 
SPRITE GENERATOR 


EYE-Q is a beautifully smooth yraph easy 
master, characterised by ab olut r ter on 
same key combinations do the same work, wh i 
makes mastering this program very easy! Free- 
drawing, magnificat da retch, ‘ 
hierarchical undo S finger-slif n‘t fatal), 
intelligent fi r ‘ e d 
colours/stipples supporte mber t = 
programs that used to e made h 
obsolete. EYE-Q_ has -defin é 
classic system ’ 1 an r 
complement to r esktop pu i t a PR 
PUBLISHER it s absolutely 
ULTRAPRINT allowing 
of output mooth ae 
of EYE-Q no one 3 
possibly be pi wi ts’ 2 utpu 
modes, ULTRAPRINT is a must, irr Pp . wh er eed 
are artistic or technical 
3-D PRECISION lets and pu - yb sm 
full control p t e, m f r or ntati 
rotation etc a er-frien r -end rogram 
resolution, extreme accuracy. Even fast enough for real-t 
movement! No programming is involved. But IF you an write 
BASIC or a 1 acce to the supplied + anh 
manipulation toolkit me you an rogram everything with 
! The utput - ION may be d 
rors producing an SBYTE reen rou wit 
APRIN s N HER 
SPRITE GENERATOR moves objects around the screen with 


flicker-free smoothness. As many as 256 sprites each with up to 
16 “frames” and individually variable speed, 256 object 


planes, 4096 exciting special effects, many serious uses. 


SUCCESS CP/M EMULATOR 
SUPERFORTH COMPILER 


SUCCESS is to P/M what SOLUTION t MS-DOS. With SUCCESS, 
you ha a t th and P/M rogram and t 
emulator work at HIGH ) 4 MH2 8 N 
knowledge f CP/M i assumed or required. Full deta f 
public domain urces for CP/M oftware provided within 
manual. Some CP/M t : : i 
UPERFORTH s THE ASSI 1) FORTH-83 mpiler, quickly 
oducing ultra-fast, tar lor mul asking 
RTH standard rigorously adhered t Many extra € 
supplied, including a fu Qoo ibrary REVERSI u ed 
free with SUPERFORTH - n FORTH ur form to anua 
ontains a detailed FORTH tutor 


IDIS SPECIAL EDITION 
IDIS INTELLIGENT DISASSEMBLER 


These programs translate all 68000 machine-code ( = what all Ql 


commercial programs comprise) into something that makes sense. 


The BEST way to learn machine code i to use a disassembler: 


but non-intelligent ones make you spend all your time on the 


boring, consuming, repetitive ha le of discriminating 
between and data, of untangling “mingled” 
routines/hierarchies, of working with addresse instead of 
names, etc. 1D01S is super, doing away with all that and 


leaving a minimum of decision-making to you. 


DO! SPECIAL EDITION does ALL the hard work, having the highest 
level of automation - it is only for use on expanded machines. 
It even allows you to disassemble keywords, d trial/scout 
disassemblie etc. The use yf IDIS SPECIAL EDITION for 


riminal purposes is NOT encouraged. 


MONITOR is a. straightforward tool intended for dynamic use, 


programs as they run (as opposed to the 


Use with IDIS. 


examining 
disassemblers, which carry out static analysis). 


MEDIA MANAGER SPECIAL EDITION 
MEDIA MANAGER 


These program manage and 


llowin a an ti etrieva t data 

e w h lamitie ams 

f ust wher m wrong, for 

h I \ w ed much 

mor g a n . ar ISE 4 t andard 

n, while actually pr m 3 i r siding a 

bi-directiona ymmunication fa ty with MS- media). A 
mu y value what you 


No nore need you be terrified of "Bad or changed medium", 


and others of that ilk! 


e 
"Read/write failed", "Not found 


PROFESSIONAL ASTROLOGER 
PROFESSIONAL ASTRONOMER 
UPER ASTROLOGER 


Ss 


PROFESSIONA ASTROLOGER anc 
unriva w - al th ~ 
ystem art wr = 
yna ry ar 
English - ften tretch g 
ieee fa ty C 
econd 
user-selectable house yste 
4 om ab a v writab 
er omprehen anual a 
astronom d ach y 
PROFE N NOMER incorp ate planetar m w 
nfinite- iltable ew f the plar 
view f the nner planets plu m w ] 
hadows e€ t a choi -ordinate 
SUPER ASTR i much leé but € er 
value. It not sited for beg houg 
ADVENTURE CREATION TOOL 
ADVEN RE R ION TOOL d s what its iWw<' = but the 
ystem for virtua y any ing apf at ; 
including the use of graph) » animati t n If ou 
want t use thi to generate adventures, everything has beer 
made very simple. An excellent RB : 
MICROBRIDGE 
MICROBRIDGE not only gives yo 3 ypponents for a ntract 
Bridge i but is a Contract Bridge bidding - 
with 16 graded lessons and a very helpful nual. 
TRANSFER UTILITY 
TRANSFER UTILITY moves program from microdrive t disk, and 


performs whatever translate you wish wh 
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DIGITAL PRECISION TURNS 40! Ee 


£ 
{ 1) PC CONQUEROR WITH MS-DOS .. . = . = «+ (238095 eT 
( 2) TURBO BASIC COMPILER WITH TURBO TOOLKIT e« 9S595 ar 
{ok PCVGONGUEROR \5 6G nite plage coins « « « « «(BOERS ef 
( ‘#}) PROFESSIONAL PUBLISHER Gu 305. - = + - - - (69295 ef 
( 5) THE SOLUTION WITH MS-DOS ... . - « ‘S355 ‘ef 
( 6) PROFESSIONAL ASTROLOGER WITH ASTRONOMER | - « 69795 at 
{. 7). PROFESSIONAL ASTROLOGER, ~ «= = w+ « - «- . 59.95 af 
{ 8) LIGHTNING SPECIAL EDITION .....-.-+-- 49.95 af 
. SDIGITAL C SBPEGZAL,EDITION « « «i s «os « 49595 af 
(10) MEDIA MANAGER SPECIAL EDITION ...... . 49.95 aT 
(13) ACT SPECIAL. EDITION: 22.0 « ss © «© « ws « 49.95 eT 
(12): -3=D’ PRECISION ‘CAD ‘SYSTEM «0-6 «3s ee ee we 49.95 OP 
(13). ‘SUCCESS "CP/M EMULATOR «. . “sa ss e & = aie 49299. ‘b? 
(14) THE EDITOR SPECIAL EDITION «..« . . - - »~. «49.95 aT 
(15) DESKTOP PUBLISHER SPECIAL EDITION ..... 39.95 ct 
(16). THE SOLUTION... . =, jake ae ae, eee oo) ee 
(17) SUPERFORTH COMPILER WITH REVERSI ee ee ee OS Ns 
(18) IDIS*SPECIAL-EDITION SS ee. Pee 58. 9S aP 
(19) MICROBRIDGE ... Se Bo ee | 
(20) EYE-Q FOR GIGAMOUSE/QRAM/THOR- a. ae «7S . PSAs at 
(21) SUPERCHARGE SPECIAL EDITION . .-.s..+. 29.95 a 
(22) THE EDITOR ie eee Shoe he) ore Wet oy eee cee. 95 cat 
(23) EYE-Q .. a olka oa, of = ganas.) eee & 
(24) SUPER SPRITE GENERATOR CAME ae Bile st lat oraie: ww Crete 
(25) PROFESSIONAL ASTRONOMER ..... «2 -+ss » 29.95 £T 
(26) DIGETALC COMPILER. -\<.s0- 268. Se whl a ae 29695) AE 
(27) DESKTOP PUBLISHER 27s, Bbtans Ske alae eee ve 
(25) MEDEA MANAGE. “sc ie 2 faletads elsim = se ee eee 18 
(29) LIGHTNING ... ee ee nk aS 
(30) IDIS INTELLIGENT DISASSEMBLER i ter &.  eehoe Sees: Se 
(FEPOSUPBREASTROLQGER . 90 sank. cae % & ee SG, Cedoee |) oe 
(32) CARTRIDGE MEDIA MANAGER ....-.. +...» 24.95 £ 
(33) BETTER GASIC EXPERT -SYSTEM Ja. ss > = «). 28.95 af 
(34) GAMES COMPENDIUM (ALL FIVE GAMES) MR ene te ta 
(AS PIORURRPREGT 6) . Sok. ates Wye 6 Bees & & inl aga Ae 
(36) MONITOR ... . Ae hw Wi gleh.c om a) tee ppuSeaeeRe 
(37) SUPER BACKGAMMON GAME eo ny eaten ale te: Bet be 5.95... £ 
(38) DROIDZONE GAME ..... .- 9.95 f£ 
(39) BLOCKLANDS GAME 9.95 f£ 
(40) REVERSI GAME <. ae 5295 if 
(41) ARCADIA GAME .......- 9.95 f£ 
(42) TRANSFER UTILITY 9.95 Db 
KEY>> Available either on cartridge or disk a 
Available only on disk b 
Minimum 512K RAM:only available on disk c 
Minimum 256K RAM:either cartridge or disk d 
Minimum 256K RAM:only available on disk e 
Available only on cartridge f 
Compatible with all THOR machines T 
Compatible with all THORs except the THOR XVI t 
TERMS AND CONDITIONS> LAO! 
* All our programs are very comprehensively documented. 
* UK purchasers - the above prices are all inclusive. 


* For the rest of Europe, add 5% to the above to cover all 
extra Charges. Rest of the world, add 10%. 


* Acceptable forms of payment are ster!ing cheque drawn on a UK 
branch of a bank or building society, sterling cash, sterling 
postal order, Eurocheque made out in sterling, international 
money order in sterling, VISA / ACCESS / EUROCARD / MASTERCARD 
(specify expiry date), foreign currency cash or cheque (add 10% 
conversion charge), direct money transfer (write to us 
notifying us of the transfer, and ensure that all charges are 
paid your end, or add 5%) to A/C 50327808 DIGITAL PRECISION LTO 
at Barclays Bank PLC (Branch code 20-79-44), South Chingford 
Branch, 260-262 Chingford Mount Rd, London E4 BUN. 


To: DIGITAL PRECISION LIMITED, 222 THE AVENUE, CHINGFORD, LONDON E4 9SE 


Please send me: 


Se ee ene, 6 SON HERO eel See eT ag: Tyee bs). eye: eS S 


* To upgrade from one version of a program to a later/superior 
version of the same program, send us the cartridge/disk. 
Except in the case of upgrades to EDITOR SPECIAL EDITION (SE), 
MEDIA MANAGER SE, LIGHTNING SE & PC CONQUEROR EMULATOR, do NOT 
send the manual too. The cost of an upgrade is £10 plus the 
difference in current advertised price between the two 
programs (e.g. upgrade from DIGITAL C to SPECIAL EDITION 
DIGITAL C costs £30). 


* Our programs are all freely transferable between cartridge 
and disk, are all free from copy protection, and all work with 
all drives, toolkits, RAM add-ons, disk interfaces (except for 
programs (1),(4),(9) & (26) which object to the MCS interface's 
non-standard device-handling) and the ST/QL Emulator. Users of 
the Microperipherals interface are recommended, in their own 
interest, to buy the QFLP ROM upgrade from Care Electronics. 


* Digital Precision is the trading name of DIGITAL PRECISION 
LIMITED, Company Registration No. 1833989. 


SPECIAL DEALS 


The following attractive offer replaces and supersedes all 
earlier offers and deals: 


* Buy ANY TWO programs, get a 25% discount on the less 


expensive one. 
* Buy ANY THREE programs, get a 50% discount on the least 


expensive one. 

* Buy ANY FOUR programs, get the least expensive one FREE. 

* Buy ANY FIVE programs, get the least expensive one FREE, and 
a 50% discount on the next least expensive one. 

* Buy ANY SIX programs, get the two least expensive ones BOTH 


FREE. 


And so on.... We'll compute the total for you if you wish. 


PROGRAM COMBINATIONS WE WOULD ESPECIALLY SUGGEST INCLUDE: - 


+ EVERYTHING BENEFITS FROM LIGHTNING SPECIAL EDITION. TO A 
LESSER DEGREE, EVERYTHING BENEFITS FROM LIGHTNING. 

+ EDITOR AND SPECIAL EDITION EDITOR ARE BOTH TERRIFIC WITH ALL 
OF THE COMPILERS (ESPECIALLY TURBO AND DIGITAL C SPECIAL 
EDITION), THE EMULATORS (SUCCESS, SOLUTION AND PC CONQUEROR), 
MEDIA MANAGER, MEDIA MANAGER SPECIAL EDITION, IDIS, I1D1S 
SPECIAL EDITION, AND PROFESSIONAL ASTROLOGER. IF YOU'VE THE 
RAM, GET THE SPECIAL EDITION. 

+ A SUPER SET-UP INCLUDES ONE OF THE DESKTOP PUBLISHERS 
(PROFESSIONAL PUBLISHER IS THE BEST) TOGETHER WITH EITHER EYE-Q 
OR EDITOR SPECIAL EDITION OR, BEST OF ALL, ALL THREE (PRO 
PUBLISHER, SPECIAL EDITOR, EYE-Q). 

+ PROFESSIONAL PUBLISHER LOVES GRAFIX. 

+ EYE-Q LOVES ULTRAPRINT. 

+ SPRITE GENERATOR LOVES EYE-Q. 

+ TURBO AND DIGITAL C SPECIAL EDITION GO WELL TOGETHER. 

+ BETTER BASIC AND ADVENTURE CREATION TOOL LOVE TURBO. 
+ 3-0 PRECISION GOES VERY WELL WITH EYE-Q AND 


PROFESSIONAL PUBLISHER. 


TIT ERE 


* UPGRADES COUNT AS PROGRAMS WHILE COMPUTING SPECIAL DEALS! 


STOP PRESS! 


FOTO TOTO TOT REE 


* 


£30 off TURBO SUPERBASIC COMPILER 


Offer expires 15th October 1989 


+ Buy PC CONQUEROR HOF prices may 3x69%! 
* We have dramatically slashed SOLUTION's price! 


We will be at THE THIRD ALTERNATIVE MICRO SHOW 10am—5pe Saturday 
11th Novesber 1989 at Bingley Hall, Staffordshire Show Centre 


or telephone 01-527 5493 ANYTIME 


Name: Address: 


TS 


Postcode: 


Delete as appropriate: ( QL / THOR ) ( Mdv / 3.5"“disk / 5.25"disk 


Enclosed: CHEQUE/PO/CASH/VISA/MASTERCARD/ACCESS/EUROCARD for £ 


Card No: 


( 720 / 1440 sectors ) 


A) 
AODIGITAL PRECISION: 10 
bal aa 


Signature: 


— 


Expiry: / 
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Since references to OL Super- 
Basic — The Definitive Hand- 
book by Jan Jones in Troub- 
leshooter last month, QL 
World has received a number 
of letters and calls with helpful 
information. 

The most helpful informa- 
tion came from Phil Borman of 
Quanta, who advised us that 
Quanta had already obtained 
permission from Jan Jones to 
re-publish this essential QL 
reference work, and would 
supply it for £8 plus £2 post and 
packing. The volume is also 
advertised by Sector Software 
at £8 inclusive of post and 
packing. 

Some readers twitted us with 
not noticing that the book - 
apparently irretrievably out of 
print — was being advertised by 


Sector in the same issue. 
Touche. In mitigation, we 


plead that we were in discus- 
sion with an eminent member 
of Quanta on the subject only 
the previous month. He was 
apparently unaware at the time 
that contact had already been 
made and negotiations were 
proceeding. 

Thanks to everybody who 
sent information or sugges- 
tions, particularly John Wat- 
son, Jan Jones’ original editor 
at McGraw-Hill. 


Thor International has found a 
new backer and has imple- 
mented a number of changes 
within the company. 

Helmut Stuven of Thor 
International and Dansoft told 
QL World that Thor Interna- 
tional I.S. — signifying a private 
partnership in Denmark — is 
now Thor International A.S.,a 
business issuing shares. 
According to Stuven, a third 
party now holds the majority of 
shares in the company, but the 
right to design and manufac- 
ture all models of the Thor are 
retained by himself and David 
Oliver of CST. 

Although, according to both 
Stuven and Penny Oliver, 
David Oliver continues to be 
involved in the development of 
the Thor, he is not at present 
employed by Thor Internatio- 
nal and has left Denmark to 
undertake contract work, 
probably in the United States. 
Said Penny Oliver in July: “We 
have run out of money and 
cannot afford to stay in 
Denmark at the moment. | 
have work to go back to in the 
States, and David may get a job 
there as well.” David Oliver is 
apparently on call to Thor 
International when the com- 
pany’s trading plans with the 
U.S.S.R. are on a firmer foot- 
ing. 

Stuven told QL World: “We 
have succeeded in getting a 
written order from one of the 
five companies we are working 
with in Russia, involving 1000 
computers and_ peripherals, 
and worth about £2,000,000.” 
Political changes in the 
U.S.S.R. at the beginning of 
June, however, have left Thor 
International waiting while an 
export certificate is produced 


THOR STRIKES OUT 
WITH CHANGES 


SSsganr 


to allow their customers to 
export goods to the West to pay 
for the computers. 

The export licences are a 
new development in_ the 
U.S.S.R. Issue has apparently 
stopped before it started while 
the ministry concerned awaits a 
new minister. 

Restrictions exporting 
and converting the rouble 
make a form of barter neces- 
sary in trading with the Rus- 
sians, said Stuven. 

Moves are going ahead to 
seek a licence from Unisoft in 


on 


Yow 


—_— 


ie 


the U.K. to port an older 
version of Unix, in widespread 
use in the U.S.S.R., to the 
Thor 16/20, said Stuven. The 
necessary investment could be 
over £300,000, so this would be 
a long-term development. 
Thor International will be 
available by telephone up to 
4pm from September. The 
revised telephone numbers, 
following changes in the Dan- 
ish exchange, are (from the 
U.K.) 010 4533 93 03 05, or 010 
4533 93 75 44. Fax is 010 4533 


93 82 92. 
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TUS CENE 


Juergen Falkenberg in Ger- 
many is marketing a colour 
scanner, the QL-Scanner, for 
high resolution digitisation of 
pictures. The QL-Scanner runs 
on a QL of minimum 256K 
expansion, or CST Thor, 
together with ‘nearly any prin- 
ter’. 

The package contains an 
interface, the QL_A/D_l, a 
reflection sensor, the A/ 
D__DS__1, the scanner soft- 
ware and an adapter suitable 
for many printers, which can be 


exchanged quickly for the prin- 
ter’s standard head to make full 
use of the scanner’s capabili- 
ties. 

The software, says Falken- 
berg, can be adjusted via two 
parameters to any printer, 
whether or not an adapter is 
available at present. There is a 
facility for ordering custom- 
made adapters, or building 
your own adapter following 
instructions supplied = on 
request. 

The scanner is designed so 


Scanner from Germany 


that all pixels are stored sepa- 
rately and can be redefined 
during scanning without having 
to repeat the scanning. Change 
of contrast and inversion can 
be implemented quickly, and 
proportional hard copy of the 
screen can be taken in three 
colours on a standard printer 
width, or black and white in 
multitasking mode. 

The A/D__1 interface, says 
Falkenberg, can also be used as 
a computer-aided measure- 
ment interface for a variety of 


functions. Falkenberg also sup- 
plies add-on boards for such 
functions as temperature sens- 
ing, personal alarm, speedo- 
meter and others. 

For prices and information 
in the UK, contact TK Com- 
puterware, Stone Street, North 
Stanford, Ashford, Kent TN25 
6DF. Tel. 0303-81-2801. 

For details in Europe contact 
Juergen Falkenberg, Hachelal- 
lee 84, D-7530 Pforzheim, W. 
Germany, local telephone 
07231 35269. 


QL Super User Bureau is con- 
cerned that somebody is trying 
to discredit it after rumours 
have circulated that it has not 
been contactable. 

While QL World has occa- 
sionally had complaints that 
QL S.U.B. has been slow to 
respond to a specific request or 
order, or that only an answer- 
ing machine has not been avail- 
able, we have normally been 


The latest list of OL suppliers 
attending the European Micro- 
fair organised by Club Sinclair 
BruQsL includes the Van der 
Auweras showing The Painter, 
a vector drawing program and 
a new word processor; Thor- 
nado Systems, Jochen Merz 
showing a QL Emulator, Rebel 
Electronics with their hard disc 
and controller, D.J.M. Import 
with spares for all Sinclair 
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S.U.B 


able to get hold of them by 
telephone or fax at their nor- 
mal numbers during the hours 
advertised. 

QL S.U.B. is available for 
general enquiries by telephone 
on 0388-450610 four line 
exchange only, Monday to Fri- 
day Yam to Spm, and for 
S.U.B. 

Helpline enquiries on the 
same number Mondays to 


Eurofair line-up 


computers, SPEM with various 
pieces of hardware including 
the Digitiser, T.F. Services, 
Miracle Systems with their 
hard disc, Tony Tebby from 
QJump, and Quanta. There 
will also be a roster of Spec- 
trum dealers. Quanta is orga- 
nising a minibus to the-Micro- 
fair. Information about the trip 
is available from Phil Borman 
at Quanta. 


BERS 


Thursdays 1pm to 7pm. Their 
fax number is 0388 601516. 
Please mark all faxes FAO 
SUB. By Email, the Prestel 
number is MBX 219998590, or 
via Prestel QLeaps bulletin 
board on 0388 773737 at any 
time. 

QL S.U.B.’s address is P.O. 


Box 3, Shildon, DL4 2LW. 
Visitors are welcome by 
appointment. 


The European Microfair 
takes place at the Eurovolley- 
centre, Beneluxlaan 22, 1800 
Vilvoorde, Brussels (exit 6 on 
the Brussels ring road), Bel- 
gium on 21 October. Informa- 
tion, travel, and up to date 
details of the Fair itself are 
available from Jacques Tasset, 
Secretary, Club Sinclair 
BruQsL,* Aarlenstraat 104, 
1040 Brussels. 


A QL World roving reporter 
saw the Rebel Electronics hard 
dise and controller at a recent 
Quanta event. He reports that 
Rebel are still ironing out the 
details of the expansion back- 
plane and are not yet ready to 
issue a model for review. “The 
people who already have one 
seem to be perfectly happy 
with it,” he reports, “but at the 
moment they are still the ones 
who know what to do with a 
soldering iron.” 

Miracle Systems is supplying 
its QL Hard Disc system but 
has a waiting list ‘of about three 
weeks’. QL World expects to 
review the system when Mira- 
cle has cleared the backlog and 
has a spare unit available. 

Miracle Systems has now 
ceased to market the Expan- 
deram, preferring to concen- 
trate on the Trump Card 768K 
Ram and disc interface. 

Further information can be 
obtained directly from Rebel 
Electronics on 0757 86630 and 
Miracle Systems on 0904 
423986. 


PEN GHANNEL 


Open Channel is where you have the 
opportunity to voice your opinions in Sinclair 
QL World. Whether you want to ask for help 
with a technical problem, provide somebody 


with the answer, or just sound off about 
something which bothers you, write to: Open 
Channel, Sinclair QL World, Greencoat 
House, Francis Street, London SW1 1DG. 


I was somewhat annoyed to see 
128K boot programs still being 
advertised for sale in QL 
World. Enclosed is a 16-byte 
routine which will perform this 
most simple task. Under your 
normal rates for publication, I 
think this program comes to 
approximately 27 pence, in my 
opinion a fair reflection of the 
number of seconds it takes to 
write a program of this type. 
This is scarcely worth a hex- 
loader, so why not use a deci- 
mal one? 
10 DATA 20032, 124, 1792, 
10364, 4, 0, 20216, 388 
20 A=RESPR (16) 
30 FOR F=0 TO 14 STEP 2 
40 READ N: POKE__W 


HeERETTH 


A+F, N: END FOR F 
50 SBYTES 
MDV1_128K, A, 16 


Add a BOOT program: 


10 A=RESPR (16): 
LBYTES MDV1__128K, 
A: CALL A 


Save this as MdV1__BOOT, 
and you have saved several 
pounds. To use this, put the 
cartridge in mdv1 before press- 
ing F2/F1 on start-up; the 
machine will then appear to 
reset yet again, and you put the 
cartridge containing your 
offensive “This will run only on 
a 128K machine” program into 
mdv1 and press F1/F2 again. 
Robert Goodwin 
Guildford, 
Surrey 


Editor’s notebook 


Young Machine. 


Nearer home, the publication of QL Playwright 
may seem like a minor note in the QL symphony, 
but authors writing for screen and stage know that 
laying out a script with dramatis personae and 
directions is a major headache for wordprocessor 
users, and they will be greateful. 

In the September issue we published the results 
of the 1988 Artist of the Year competition. Next 
month — all being well — we should have details of 
the next art competition. Start sharpening your 


keyboards. 


Lastly, late last year, a Mr Parrott sent us a 
proposal for a series of articles. This proposai, we 
now know, was lost in the post with all 
documentation in early 1989. If he would like to risk 
contacting us again, we will try again. 


10 


The most interesting news this month is that Thor 
International is making definite headway in its drive 
to put the Thor into mass production through the 
medium of a major deal with the Soviet Union. The 
deal appears to be waiting at the terminus for take- 
off as | write, but the Soviet bureaucracy must one 
day creak into action again, and then: Go East, 


Page 1 


Loc Object STMT 


as an 


Trap 


1 
2 
3 
* 4£40 4 
* 007C 0700 5 

6 


* 287C 0004 0000 7 


4EF8 0184 


Ark 


Recently I wrote to Ark to 
enquire about the Master Spy 
editor. I wanted to know speci- 
fically whether the editor cold 
be invoked using the Toolkit I] 
command EX and the names of 
the file to be edited, passed as 
an option string such as: 


EX MS; flp2__file_txt 


In little more than a week I 
received a copy with a letter 
stating that my enquiry had 
provoked much hacking and as 
a result a new version had been 
produced which could be 
invoked in the foregoing man- 
ner. 

I would like to thank Ark for 
the superb service and would 
commend Master Spy to any- 
one programming on the QL. 
It is fast and flexible and an 
ideal editor for programming 
applications. 

S. Bedford, 
Bracknell, 
Berkshire. 


I have a problem with a prog- 
ram, Home Finance, which 
centres on its inability to run on 
the expanded QL, giving the 
erroneous “out of memory” 
report. 

I have tried ways of over- 
coming this and then saw page 
43 of the November 1986 QL 


ORI.W £$0700, SR 


MOVEA 


QL Macro assember version 1. 10 


Source statement 


#Sets expanded machine to behave 


unexpanded 128K machine 
£0 Supervisor mode 
Disable interrupts 


L £$40000, A4 Address for ‘top of 
physical RAM‘ 


$0184 Reset 


World, in which Colin Opie 
gives a solution to the problem 
—see figure three in that article. 
Unfortunately I cannot make 
this solution work on my 
machine, getting an error mes- 
sage: 


At line 200 bad name 


What I am trying to achieve 
is a means by which I can run 
this program the SuperBasic 
environment of Taskmaster 
which means I have to avoid 
shrinking the memory as I do as 
present. 

I am using a JM QL with two 
Sinclair disc drives and a Mira- 
cle Systemd 512K Expan- 
deram. I have a very limited 
knowledge of programming. I 
like my QL, use it a good deal, 
and rely heavily on your maga- 
zine for gradual instruction in 
Computerese. 

Noel Boland, 

Cotswold Hills Gold Club, 
Ullenwood, 

Cheltenham, 

Glos. GL53 9QT. 


Buzz 


I have a standard QL with 
Miracle Systems 512K Expan- 
deram and the QL Home 
Finance program by Buzz Soft- 
ware. With the Expanderam 
fitted, all programs load cor- 
rectly, except for Home 
Finance, which runs, displays 
the title page, runs a few more 
seconds, and then displays “At 
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line 200, out of memory.” I 

understand that this program 

was designed for unexpanded 

QLs but I feel there must be a 
way round it. 

H M White, 

18 Grasmere Road, 

Frodsham, 

Cheshire WA6 7LW. 


Editor's comment: Users with 
memory expansion units often 
experience problems with cer- 
tain programs written for the 
unexpanded QL, especially the 
original Psion quartet. If any- 
body has experience of this 
combination, the readers con- 
cerned would doubtless be very 
grateful for any advice you can 
give. 

Neither correspondent says 
whether he has tried contacting 
Buzz or Miracle Systems for 
advice. The publisher! 
manufacturer is the first and 
best recourse when problems 
arise with specific packages. 


Fast 


I was interested in the article 
Whither the QL? in the May 
1989 issue. I believe the major 
problem is not with hardware — 
the QL is good but everyone 
would like more immediate/ 
faster operations — but with the 
software which is, because of 
the operating system, specific 
to the QL in most cases. 

We were faced with a similar 
problem in the Xchange Users’ 
Association. This excellent 
integrated software is also 
available in enhanced form on 
other machines including Apri- 
cot, IBM and Amstrad PC- 
compatibles, either complete 
or in the more limited PC4 
version. 

Psion has informed us that it 
has no immediate plans to 
update the software. At our 
last annual meeting, however, 
we decided to continue the 
Association. Many of the users 
have large databases and have 
invested time and money in the 
software, which performs its 
tasks adequately. 

We would all like to improve 
and update the programs but to 
change to a complete new 
language, with possibly incom- 
patible data files, would be a 
step which is not, in the view of 
many users, worthwhile. It is 
important that manufacturers 
recognise that fact. 

We at the Xchange Users’ 
Group would be happy to wel- 
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come QL Xchange users into 
our Organisation. 

John Hanford, 

Xchange Users’ Association, 

Freepost, 

Beckenham, 

Kent BR3 2BR. 


I have read several times about 
a new command for the JS 
ROM, TRA, but I have never 
seen its syntax. As it translates 
characters to the printer it 
could be the solution for the 10 
translatable characters allowed 
by Quill. 

Iam using Metacomco Lattic 
C, but I found the linker —- GST 
Linker R101V030 — too slow. 
Does anyone know a faster 
one? Where can I get the 
Sinclair Relocatable Object 
File standard? I could write a 
new, faster linker. Does any- 
body have any clues? 

Joao Cardoso, 

Pr. Sousa Caldas 102-42 
4400 VN GAIA, 
Portugal. 


Post 


Normally my QL travels 
around in a briefcase with a 
disc drive and box of connec- 
tors. We go through severe 
baggage searches in hotels, and 
work on other people's prin- 
ters. Mr Tony Firshman’s life- 
line services kept me going last 
year with a repair that took 
from a Fax enquiry on Wednes- 
day to being back in Jordan 
from London and in use by 
Monday night. Salute the 
postal services between Jordan 
and the UK, and Mr. Firshman 
—and all in the teeth of secruity 
blocks on electrical packages 
by post. Roy Myers, 
Haddington, 
East Lothian. 


lelp 


After several attempts to 
recover an unclosed Archive 
file with the variety of recovery 
programs available, I hit on the 
simple expedient of creating a 
file for test purposes, duplicat- 
ing it under another name, 
then deliberately omitting to 
close one of the files. 

Then I examined the two 
files in the ‘edit file’ facility of 
QKick file was missing the ‘v’ 
from the file header, normally 
vrmldbf. It was easy to restore 


the ‘v’ via the edit facility and 
re-save the file. When tested in 
Archive, the file was readily 
opened and behaved normally 
This has saved many 
headaches with files I though 
were lost for ever because of 
mains glitches and also pure 
carelessness. I hope this will be 
of use to other Archive users 
who have suffered similarly. 
G. M. Young, 
Ravenshead, 
Nottingham. 
Editor’s comment: As I am at 
this moment struggling with a 
major file loss caused by — we 
think — a minor procedural 
error, I can say with feeling that 
I hope that Archive users every- 
where will bless your name 
many times in the future. 


I am thinking of buying an 
Integrex 132 colourjet printer 
for my QL. It is claimed that 
this printer is supported by 
screen dump software for the 
QL. I need a printer for heavy 
duty colour graphics and text 
printing and consider dot- 
matrix ribbon printers unsuit- 
able. 

I would be grateful for any 
advice OL World readers could 
give me on this printer and on 
software which would enable it 
to be used with the QL, or any 
other suitable colour printer 
for the QL. 

Kieron Salmon, 
Robon Hill Cottage, 
Water End, 
Stokenchurch, 
Bucks HP14 3XQ. 


Loose 


I mailed a letter and Microd- 
rive cartridge to you on June 
12. A few days later the Mic- 
rodrive cartridge was returned 
to me by the Post Office stating 
that “This article has been 
found loose in the post.” Luck- 
ily I had labelled the cartridge 
cover with my name and 
address. 
You may like to quote this as 
a warning and suggestion to 
readers, this time I am using 
the envelope method. 
E. Bamber 
Milngavie 
Glasgow 
Editor's comment: Putting the 
owner’s name and address on a 
label on all Microdrive car- 
tridges sent to this or any other 


publisher is a useful safeguard 
against loss but the single most 
effective safety devices is to 
fasten the mdv case firmly to its 
covering letter, so that the car- 
tridge can be slotted in and out 
of the case without separating it 
from the paperwork. Putting 
loose cartridges in envelopes, as 
many folk do, is asking for 
migrating Microdrives. 


I have modified Giles Todd’s 
DIY Assembler and obtained a 
79 percent speed increase: 28 
percent from the use of a 
temporary file as suggested by 
Giles Todd, and 72 percent 
from restructing several key 
modules. 

The only ‘enhancement’ | 
have added is the ability to use 
lower case input. Output has 
been checked using a dissas- 
sembler. I have also corrected 
the bug in the line 12800, which 
related to addressing errors 
subsequent to an ASR instruc- 
tion. 

Graham Worsnop, 
Sutton, 
Surrey. 


Most users have the translate 
to print the correct £ symbol (£, 
esc) Ky ERK “#4, ESC. R: 
NUL) but where can one get 
the full list of translates to get 
the full keyboard to work cor- 
rectly? 
Norman Durrant, 
185 Portland Road, 
Edgbaston, 
Birmingham B16 9TD. 


Iam a dabbler in machine code 
and would like to pass on the 
following tip: with MOVEQ 
the limit of transferring data is 
128-127, that is ##-$80 to 
##7F. To transfer 128 the 
usual way is MOVEL 
##80Dn. An alternative is: 
MOVEQO ##-$80, Dn 
NEG. L Dn 
I have tested both over 20 
million loops. The times are: 
empty loop: 64 seconds; usual 
method: 152 seconds, includ- 
ing empty loop; alternative: 
131 seconds, including empty 
loop. 
C. D. Seaden, 
Foxhole, 
St. Austell, 


ll 


A P 


ome useful information has 
been provided in answer to my 
query about connecting buf- 
fered and unbuffered adapter 
units to the expansion port. Graham 
Priestley, who was responsible for hard- 
ware design at CST, states that the 
original QL design assumed little expan- 
sion would be required, a 512KB addition 
to memory which Sinclair never produced 
being thought sufficient. It was expected 
that Microdrives would be the only stor- 
age medium. The expansion port is 
unbuffered, which made it cheaper. 

The strength of the signals available 
through this port is such that only a limited 
amount of external circuitry can be driven, 
unless buffer chips are provided. Buffer- 
ing does not solve all the problems of 
connecting devices externally; there is 
also the matter of establishing reliable 
communication between devices and the 
CPU chip and handshaking is used to 
indicate completion of data transfers. 

Those who follow the development of 
PCs will be aware that distance is becom- 
ing critical in their main board design, with 
the rapidly-increasing operating fre- 
quency of CPU chips — typically 20- 
33MHz and rising towards 5SOMHz — 
placing a premium on first-class PCB 
design; the U.S. restrictions on generated 
radio interference from the PC also 
constrain the designer, so that the time 
appears to have arrived when the really 
good designers are being sorted out. 

Obviously, the considerations with the 
QL were on a lower level but nevertheless 
the expansion devices produced varied 
considerably in their design quality. The 
68008 chip expects signals to be returned 
in less than half a cycle of the 7.5MHz 
clock and this is a tight schedule on all the 
wiring, PCB track, connectors and com- 
ponents of a typical expansion path. 

Most QL peripherals are apparently 
designed to work without the use of wait 
states, deliberately-introduced delays to 
allow operation of slow devices to be 
synchronised with the fast CPU and, the 
further from the CPU they are, the more 
chance there is of devices returning 
inaccurately-timed signals to it. 

EPROMs may not work reliably in an 
expansion chassis for this reason. The 
problem can be avoided by keeping the 
signal path short and this was done with 
the Trump Card and the earlier Medic 
interface. The alternative was to use a 
much more complex design, with the 
appropriate circuitry for ensuring correct 
timing; the CST +4 unit was such a device 
and no doubt many users like myself 


Bryan Davies looks 
at the prospects for 
memory expansion 
on the QL 


eagerly awaited further details of that, 
when it was first mentioned several years 
ago. Unfortunately, some existing 
devices would not have worked with that 
unit and the all — CST solution was too 
expensive for most tastes, although a few 
hundred were sold and CST designs set 
the standards for others. 

One further thought concerns the way 
Sinclair used pins on the 64-way connec- 
tor for decoding the addresses of expan- 
sion devices. The expansion slot appears 
to be in the lowest 16KB of the hardware 
expansion area and 16 devices can be 
connected but, if they follow the Sinclair 
numbering standard correctly, some com- 
binations of cards will not work. A disc 
interface and memory card can work 
together but a disc interface and a second 
hardware expansion card cannot, unless 
one of them is modified to appear at a 
different slot number. 

Priestley has offered technical assist- 
ance on QL or Thor constructional pro- 
jects. In case there is a flood of requests, 
we are not publishing his address — 
letters should be sent care of QLW. 


Not unbufferd 


Returning to what prompted my original 
query, it would seem that an unbuffered 
multi-way expansion adapter card is not 
the proper way to go. It might work to 
some extent but only with certain expan- 
sion cards. It is a pity there do not appear 
to be any really “commercial” buffered 
adapters now available. You are still 
limited to one expansion card in the main 
expansion port. 

We are always in the situation where 
the user cannot influence directly what is 
being produced. One has to wait for new 
products to appear and then buy them if 
they offer sufficient of the required 
facilities at a suitable price. That leaves 
gaps in the range of available hardware, 
some of which may be evident to de- 
signers, but the commercial potential may 
be thought too limited. 

Taking users of the Trump Card as 
likely purchasers of further enhance- 
ments, what do such users think is 
missing from the market? For example, 
there are several useful programs avail- 
able on plug-in ROM modules — /ce and 


MORURGSLEE 


Lightning for instance — but they cannot 
all be used together. You have a problem 
if you want to use more than one such 
ROM. Units have been sold which 
allowed several ROMs to be mounted on 
one PCB but | believe they all operated on 
the basis of switching in only one ROM at 
a time, not really satisfactory. 

Copyright and space problems pre- 
sumably prevent several programs being 
put on to one ROM unit; it would be 
difficult to decide on a configuration to suit 
a significant number of buyers anyway. 
Incidentally, my experience with the Ice 
ROM suggests that anything plugged into 
the ROM port needs to have an additional 
attachment, beyond the connector. A 
U-shaped wire bracket, going round the 
ROM unit and screwed to the QL casing 
at either side of the port, got rid of 
occasional strange behaviour; Samsung 
QLs have a spring to press on to anything 
inserted into the port. Once the Trump is 
in place you cannot fit any other expan- 
sion cards. Even if you could fit them there 
would be the problem of finding address 
space for them, since the Trump takes up 
the spare slots. If you want to connect 
both a serial and a parallel printer there is 
no parallel connector. 

Being more ambitious, what are the 
chances of improving the QL operating 
speed and memory capacity and adding 
the capability to handle high-density 
floppy drives? Presumably, the original 
layout of the QL makes it virtually impossi- 
ble to run the whole machine at the full 7.5 
MHz and a faster CPU would gain us 
nothing. The full 16-bit or 32-bit CPU 
chips no doubt create major integration 
problems; could they be added separately 
from the 68008? 

Priestley mentioned that the SCSI/2 
interface specification, as used for hard 
disc interfacing, includes provision for the 
linking of slave processors; could the 
display and printer be driven by such a 
fast processor and permit much better 
resolution and speed for desk-top pub- 
lishing and CAD? 

The 68020/68030 CPUs have found 
favour in the PC world for driving laser 
printers, where there is a large overhead 
of conversion work to do to make the PC 
program output suitable for driving the 
basic laser engine. RAM of 1MB has all 
but become the basic amount on several 
types of micro and even the 16MB 
potential of 80286 and 80386 PCs has 
soon been overwhelmed by ways of more 
than doubling that amount. 

There would not be too much point in 
increasing the available memory of the 
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QL greatly until faster operation were 
possible but a fair number of users would 
be interested in raising the total to 1MB — 
what happened to the Sandy design? 
Once having used high-density 1.2 and 
1.44MB floppy drives, the 720KB in the 
QL system seems restrictive and we are 
soon to be faced with 2 or 4MB drives as a 
new standard on PCs, if one accepts 
magazine comment on the subject. 
text®” now has French and German 
versions. The latest version of Tony 
Tebby’s QTyp spelling checker caters for 
the English version of this program; check 
before ordering but | think it likely the 
German version is also supported. 
Further enhancements to text®’ should 
be available before the end of the year. 

FlashBack Special Edition is receiving 
final touches and it is hoped copies will be 
available by the time this article is pub- 
lished. For those who are not aware of the 
main reason for the delay, the program- 
mer who was writing the add-on modules 
withdrew because of other commitments 
and the original writer of FlashBack 
stepped in late in the day to get the project 
completed. The revised version of Light- 
ning and Media Manager Special Edition 
have now been available for some weeks; 
for those who want to gain every bit of 
extra performance the latest Lightning is 
well worth investigating and the new 
Media Manager is a_ considerable 
improvement on its predecssor. 

A surprising number of Tandata 
modem sets have seen sold recently; the 
total is estimated to be around 500-700, 
with more to follow. The obvious reason is 
the very low prices — £29-£39. Sector 
Software should by now have sold all its 
stock of the complete set of three units — 
but expect to have two-unit sets — without 
QCall, therefore lacking auto-dial and 
auto-answer — available for £29 inclusive 
of VAT. If any recent buyers have found 
that the supplied software does not work 
with an expanded QL they can try contact- 
ing Tandata, which has been supplying 
the later software at low cost; version 2.2 
is suitable for expanded QLs. As Tandata 
has obviously cleared its stock of units it 
may not be prepared to deal with 
enquiries for much longer. 

| hope that alert readers who read 
Trouble Shooter in the August issue, 
then looked at the end of the Sector 
Software advertisement in the same 
issue, will not think too badly of me. My 
comment about the possible cost of re- 
introducing Jan Jones’ book QL Super- 
Basic — the Definitive Handbook were 
made some time before that advertise- 
ment was made up and it was not known 
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to me that David Batty had been success- 
ful in obtaining permission to sell the 
book without having to find as much 
money as had been suggested pre- 
viously. The price of the book is £8 from 
Sector Software. For anyone who does 
even a little SuperBasic programming, 
this is the reference book. The reprint is 
being published by Quanta — see QL 
Scene. 

Checking through cartridges sent to QL 
World with programs on them it was no 
surprise that some of the programs did not 
run or gave errors. Roughly two-thirds of 
the cartridges checked showed a total 
sector-count — the figure on the right after 
a directory — of less than 218, with a few 
showing less than 210. To make matters 
worse, the difference between the “avail- 
able” and “total” figures in several cases 
was more than the 2-3 sectors, which is 
about the limit for trustworthy cartridges. 
A reasonable Microdrive and cartridge 
combination will give 218/220 or more. 


Clean drives 


This is just another reminder to check 
your Microdrives; push the rubber roller 
down on the motor shaft and clean the 
debris from the roller with isopropyl 
alcohol or fit a new roller. If one drive is 
much better than the other, use it for 
saving important files. 

Clive Turner reports receiving a work- 
ing copy of Talent Cosmos + but it still 
arrived on cartridge instead of the 
requested disc and a session with an 
editor was necessary to make the pro- 
gram usable from disc. He finds the 
program much improved and a master 
key cartridge is no longer needed. 

Stuart Robertson would appreciate 
advice on transferring data between the 
Commodore Amiga and the QL. He is 
trying to send register dumps from the 
Amiga via the RS232 port, a process 
which can be done only at 9,600 baud, 
with one stop bit. Unfortunately, the QL 
User Guide states specifically that more 
than one stop bit is required at that speed. 
Normal communication is satisfactory at 
lower rates. Any suggestions? 

Miracle Systems has replaced the 
serial-parallel interface which was caus- 
ing printing problems with Front Page for 
M. C. Holland. Printing from that program 
and Easel is now normal. 

Humphrey Ziberlin of Eindhoven com- 
plained about not receiving an “anti- 
bounce” modification for his keyboard 
from Schén for a period of several 
months. Schon report that the goods have 
since been despatched. As it can find no 
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record of previous letters concerning 
Henri Hulet, copies have been sent. 

PDQL reports having sent a KBL 
casing and repaired QL to Robert Carley. 
The delay was occasioned partly by the 
QL not working properly after initial repair 
but mainly by slow delivery of the KBL 
from another supplier; the latter situation 
should not recur, as the source of such 
delay has been located. 

There have again been two letters from 
overseas readers complaining about the 
higher prices charged to them, compared 
to those for U.K. residents. Be assured 
that this is not an attempt to make more 
money out of unfortunate overseas QL 
owners; it is a reflection of the fact that the 
cost in time and money of handling 
overseas orders is much higher. Where 
products are relatively expensive and 
have a good profit margin — i.e., hard- 
ware like disc drives, memory expansions 
— some or all of the extra cost can be 
absorbed by the supplier but it costs 
equally as much to send a £20 program 
with comprehensive instructions and 
there is not sufficient profit in that to cover 
the extra costs. 


INFORMATION 


Jan Jones’ book 

FlashBack Special Edition, 

Tandata modem: 

Sector Software, 

39 Wray Crescent, 

UlInes Walton, 

Leyland, 

Lancs PR5 3NA. 

Tel: 0772 454328 — bulletin board 
after 1800 hrs. 

text®’: 

Software®’, 

33 Savernake Road, 
London NW3 2JU. 


QTyp: 

Care Electronics, 
800 St. Albans Road, 
Garston, 

Watford, 

Herts WD2 6NL. 

Tel: 0923 672102. 


Lightning, 

Media Manager Special Edition, 
Digital Precision, 

222 The Avenue, 

Chingford, 

London E4 9SE. 

Tel: 01-527 5493. 
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BASIC 


Improvements 


In Part Three of our occasional series, 
Desmond Barry presents some programming 


tricks which will speed up your SuperBasic code 
with no expensive add-ons. 


here has probably been the odd 

occasion when you have wished 

that there was more speed avail- 

able in the QL — probably on 
more than the odd occasion. This article is 
about various things you can do to speed 
your code. It will not make it go like 
machine code or a Thor XVI but some 
tricks can gain you a good deal. 

The two main areas of consideration are 
the screen and response times. They also 
overlap on occasions. So far as the 
screen is concerned, not much can be 
done to speed it directly unless you bypass 
it. If you do that, you will not produce 
anything which multi-tasks. The screen is 
linked to the multi-tasking routines and 
windows. That is why it is slow. Plenty is 
happening when you issue a screen com- 
mand. 

If you want to bypass the screen control 
there are sufficient pieces of code avail- 
able to use as basic algorithms which are 
satisfactory on lesser computers. As a 
supporter of the QL, the Thor and Qdos/ 
Argos, I am not going to help you spoil a 
great computer. 


Few updates 


The principle behind speeding the 
screen is to use it as little as possible; 
update things when they need it rather 
than all the time. It is also worth looking 
for other ways of doing things. 

BLOCK is a very useful keyword. It can 
be used for simple colour manipulation 
and clearing windows. It is affected by the 
OVER command. 

Not many people know that, because it 
does not say so in the manual. Type-in this 
program: 


100 WINDOW1,256,200,256,0: 
WINDOW#2,256,200,0,0 
110 OVER#2,0 
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120 LIST 

130 BLOCK #2,256,200,0,0,4 

140 PRINT “That was BLOCK with 
OVER 0°/*Press a key”. PAUSE 

150 LIST 

160 OVER#2,~—1 

170 BLOCK #2,256,200,0,0,4 

180 PRINT “That was BLOCK with 
OVER —1”/“Press a key”: PAUSE 

190 BLOCK#2,256,200,0,0,4 

200 PRINT “That was the same again. 
Interesting?”/“Press a key”: PAUSE 

210 RECOIL#2.,7,6,5,4,3,2,1,0 

220 PRINT“ And that was RECOL” “All 
finished” 


Note also that BLOCK can be set as any 
size from one pixel to the size of the 
window with which you are working. It 
can be very useful for cursors and high- 
lighting. 

If you want to update something, say 
row and column numbers, do it when 
nothing is happening or at the end of a 
timed period. For instance: 


370 n=code(INKEY$#15,50)): IF NOT 
n THEN update:GOTO 370 


In this case, INKEY$ waits for one 
second; then, if no key has been pressed, 
procedure ‘update’ is called. If a key has 
been hit, control passes to the next line, 
whatever it is. This little trick means that 
the screen is not updated unless nothing is 
happening. As an alternative, you may 
like to update something at regular inter- 
vals. Try this: 


500 t=DATE 

510 REPEAT loop 
520 lots of 

530 code to 

540 do something 
550 like the 

560 main loop 


570 in the program 

580 IF DATE>t+10 then update: 
t=DATE 

590 END REPEAT loop 


This updates only if a minimum time, 10 
seconds in this case, has passed. Line 580 
checks if time t has increased by 10. 


Slow down 


Why do this kind of thing? It may be 
surprising but even an apparently small 
job such as writing two characters to the 
screen can slow everything. To keep a job 
moving, eliminate as much unnecessary 
work as possible. 

The next ‘speed-up’ technique is 
another variation on doing as little as 
possible. This next piece of code is how 
one would normally do a menu loop: 


700 REPEAT loop 
710 n=CODE(INKEY$(#15,—1)) 
720 SELECT ON n 


730 =49:option] 
740 =50:option2 
THOS ae 

760 =56:option8 


770 END SELECT 
780 update—screen 
790 END REPEAT Loop 


There is nothing basically wrong with 
this, except that every time a key is 
pressed the loop is executed and the 
screen updated. This occurs whether the 
key is valid or not. If it is not you are 
wasting time doing nothing useful. In a 
long loop that will result in response 
times becoming longer and that can be 
annoying for the user. Now look at this: 


100 REPEAT loop! 
110 REPEAT loop2 
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120 n=CODE(INKEY$(#15,—1)) 

130 IF range(n,49,56) then EXIT 
loop2 

140 END REPEAT loop2 

150 SELECT ON 


(Rest as the above example) 


In this routine, the main SELECT will 
be used only if a number between | and 8 
is hit. Otherwise control remains in the 
much shorter and therefore faster loop2. 

Do not use procedures and functions if 
they are not necessary. They involve a 
time overhead when being called. If the 
structure is called from only one place, or 
from not many places and it is fairly short, 
it can be worthwhile not using a structure. 
This is especially the case if the routine is 
likely to be called rapidly in succession, as 
in a cursor-moving routine. 

Another thing which can help is not to 
make your code too flexible. That may 
sound odd and it tends to go against the 
principle of using parameter-passing to 
procedures and functions, but if you have 
a very flexible piece of code it probably 
spends a fair bit of time checking validity 
of parameters and so on. If you want the 
fastest code, cut it to the minimum. Of 
course, this may also mean you need 
several pieces of code doing broadly the 


same thing, in which case it can use 
memory. It is a compromise, like so many 
other things in programming. 

Avoid screen-scrolling. It takes a long 
time. It is generally faster to clear it and 
refresh with a new batch of data if that is 
possible. It may be faster to use AT to 
control printing rather than just letting 


“It may be 
surprising, but 
even a small job 
such as writing two 
characters to the 
screen can slow 
everything down.’ 


,’ 


Qdos take its course. It may take a little 
more code to control when a window is full 
but it is faster. 

This may sound strange but if you are 
running only in SuperBasic, floating point 
numbers are faster than integers — my 
tests say about 10 percent faster. If you are 
compiling, integers should be quicker. 
Remember that FOR loops cannot nor- 
mally use integers as the controlling 
counter. In some situations, the bitwise 


logical operators may be faster than any 
alternatives. 

I found a rather odd thing once about 
QL maths. In a long equation the time to 
calculate it is roughly proportional to the 
length of the equation. In other words, a+ 
bis done slightly faster than twice as fast as 
a+b+a+b. It also does not seem to matter 
which operators are used — +,—,*,/, °. 

If you have missed the significance, it 
means that the QL spends more time 
reading what you have programmed than 
doing it. So the shorter you can make the 
equation the faster it will run. Look at 
this: 


100 FOR a=1 TO 50 
110 PRINT a*(n*x—y)+a *(n*x—y) 
120 END FOR a 


I do not know what it means either. 
Now look at this: 


100 z=n*x—y 

110 FOR a=1 to 50 
120 PRINT a*z+a *z 
130 END FOR a 


When I ran both, using 10,000 iter- 
ations, the loop in the second ran about 45 
percent faster. That is worth having, is it 
not? 


text®’ Version 2.00 
STATE OF THE ART IN QL SOFTWARE 


87 é : 
text’ Advanced word processor with multiple screen founts. Many 
text-mode printer drivers are supplied with the program. 


fountext™ State-of-the-art graphic printer driver for text”. 
Now supports many non-Epson printers as well as Epsons and 
compatibles. fountext™ is supplied with 32 high-quality founts in 
different styles and sizes up to,72 pixels high. Full WYSIWYG. 
Dedicated 24-pin version is supplied at no extra cost. 


founted” New version Graphics editor for text” and 
fountext™. Allows you to create founts up to 84X96 pixels. Captured 
screen images can be loaded to produce picture founts for use within 
documents. 


2488 State-of-the-art dedicated text-mode printer drivers for Epson, 
NEC and Star 24-pin printers and compatibles. The drivers support 
multiple typefaces, proportional spacing, double-height and doublt- 
width modes. 


ty eset” State-of-the-art dedicated text-mode printer drivers 
for high-resolution printers. typeset” — I for Epson GQ 3500 laser 
printer and typeset” — II for the Canon BJ 130 bubble-jet printer 
support all the printers resident founts including proportional spacing 
in different sizes. 


text” requires memory expansion (as little as 64K will do). fountext 
and founted” require at least 128K expansion. 


See the reviews in QL World (April) or Quanta (March, May). Send for 
our free comprehensive lealfet if you need more information. 


An independent telephone support service including an excellent step- 
by-step tutorial disk is now available. Contact Mr Terry Harman on 
0604 842875 for details and the charges. 
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Software and manuals are available in English, French and 


German 


text” £45 fountext™ £25 


founted” £15 
Complete edition: 
typeset” I and II 
German version: 


Upgrades: 


text” + fountext™ + founted” £80 
£25 each 2488 £15 
add £4 to the total 


text” from version 1.xx to 2.00 costs £15. founted” from the original to the 
new version costs £3. Please send manual and disk. 

Other software: 

New version of Qtyp (including Hotkey System 2 multitasking and key- 
definition software) can check the spelling of complete text” files at the rate of 
200 words per second! 

Taskmaster £25 Qtyp £29 
Spellbound £29 Qpac £19 
Prices ave inclusive of airmail worldwide. Payable by cheque, Postal Order, 
Eurocheque or credit card. Please specify language, cartridge or disk system (3/2" 
and 5'/;" disks, single or double sided, 80 or 40 track, can be supplied). 
Send your order to Software”, 33 Savernake Road, London NW3 2JU, 
UK. 

Credit card orders by telephone and personal callers are welcome by 
Care Electronics, Tel 0923 672102. 


Software’’ 
33 Savernake Road 
London NW3 2JU 
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QL HARD DISK 


40 Mbyte Hard Disk 


Sincliai- 


(£355¢exp) 
Mass storage with fast access 


Over 40 megabytes of programs and data can be stored on the Miracle Systems QL Hard 
Disk - the equivalent of more than 55 floppy disks. Loading from and saving to the QL Hard 
Disk is also much quicker. So you can now have the convenience of holding all your files on 
the QL Hard Disk, all accessible at any time, rather than having to repeatedly insert and 
remove floppy disks. The floppy disks themselves (or Microdrives) need only be used 
for loading new software and backing up the QL Hard Disk. 


The QL Hard Disk is a complete unit comprising a hard disk mechanism, an interface and a 
mains power supply all housed in a black metal box. It connects to the QL via the ROM port 
and has a through connector for a ROM cartridge. To keep the handling of files simple an 
enhanced directory system is implemented in the QL Hard Disk firmware. 


MIRACLE SYSTEMS, 25 Broughton Way, Osbaldwick, York, YO1 3BG, U.K. 
Tel: (0904) 423986 
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14 dav aoe — guarantee on all products 
12 month warranty on all products 
UK prices include VAT and P&P 
(Export prices in brackets include P&P) 


QL TRUMP CARD RAM & DISC I/F QL 5.25" DISC DRIVE 
£249 (£219) £125 (£114) 


768K RAM increases QL memory to 896K ¥r 360K capacity 
vx Ideal for SOLUTION 


res hana 5.25" disc interface ae x Through-con for double 3.5" 
RAM disc 

Printer buffer 

Memory cut QL DISC CARD 
Toolkit II £100 (£89) 


TRUMP CARD without RAM 


QL TRUMP CARD PACKAGE bijiny- ng ticity 
TRUMP CARD & DUAL DISC DRIVE Goninale up is 4 drives 
£399 (£354) 


ve 2x 720K, 3.5” 
vx Very quiet operation 
vx Cables & 10 diskettes included QL CENTRONICS 
TRUMP CARD 256K £29 (£28) 
£135 (£120) 
vx Increases QL RAM to 384K SER1/SER2 to parallel printer 


TRUMP CARD 256K Package Standard Centronics plug 
£285 (£255) Default QL set-up 9600 baud 


tx TRUMP CARD 256K + 2x720K drive | 3 metre cable included 


we ae 
To: MIRACLE SYSTEMS, 25 Broughton Way, Osbaldwick, 
York, YO1 3BG, U.K. Tel: (0904) 423986 


(0904) 423986 _| Please send me _ snl 


| enclose a cheque to the us ie SOR 


To place an order by phone please | or debit credit card | ooooonooonoooo 


| 
| 
| 
| 
have your credit card ready. For | 
| 
| 
| 
| 
| 


overseas Customers we charge the | , 
prices shown in brackets. Bh ge td UL 3 
| SIROENO Sei. mip leat AM: vn ae eg) 
To order by post, please fill in the | Address prs aco! My 
form opposite or write to us quoting l we, iRise 4d ae 35 ‘ 
your credit card number and expiry rs -—- — 
date, or enclosing a cheque payable | 
to MIRACLE SYSTEMS. Fedor ROR goon ainms seperamiede ate: bocck oo era ee eee aot 
Sinclair/QL World October 1989 17 


INFORMATION 
Product: QL Playwright 
V1.1 

Price: £14.99 


Supplier: E. J. Wilce, 48 
Liddington New Road, 
Guildford, 

Surrey GU3 3AH. 


his is one program 

which certainly can- 

not be called run-of- 

the-mill. Few  prog- 
rammers risk offering a word 
processor program for sale 
and very few would offer one 
for a particular, small group of 
users, in this case, writers of 
scripts for TV, film and theatre. 
The apparently limited appeal 
of this program may be mis- 
leading; the buyer is not obli- 
ged to use it for writing epic TV 
series and a little imagination 
could find other uses for it. The 
author has been sensible 
enough to give the program a 
fair degree of flexibility; it is for 
the user to decide what to do 
with it. 

The QL world has its share 
of people with interests which 
might seem rather unusual to 
the general public but an 
interest in theatre is not 
uncommon. There must be 
thousands of amateur theatre 
groups and hundreds of peo- 
ple writing scripts for one type 
of production or another. It is 
just that | had, until now, 
thought of this as being 
Amstrad PCW country, not QL 
territory at all. 


Disc only 


The first thing to note is that 
this program does not fall into 
the amateur category. It is well- 
presented and works smoothly 
and speedily. The code is 
compiled with Turbo and a run- 
time module of Turbo exten- 
sions is supplied. While it is 
said to be usable on an unex- 
panded QL it is clear that it is 
really intended for use only on 
a machine with memory 
expansion; itis apparently sup- 
plied only on 3.5in. disc, which 
is a further limitation to the 
number of potential custom- 
ers. There can scarcely be any 
complaint about the price — 
even shareware or public 
domain programs are effectly 
little or no cheaper. 

The program documentation 
is supplied on disc files and 
one cannot expect an elabo- 
rate printed manual for the 
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price. The file is not a Quill one; 
you have to run QL Playwright 
to load the documentation files 
and the supplied single page of 
written instructions for making 
a back-up copy and using the 
program are not comprehen- 
sive, to say the least. 

That said, most users should 
not be too annoyed by the way 
the back-up routine asks no 
questions and gives no mess- 
ages but writes the names of 
the files to the screen as they 
are backed-up. If you boot from 


nature of the program. In fact, 
SpellBound seems to work on- 
line with QL Playwright and 
also off-line in conjunction with 
FileBound. This should not be 
taken as an assurance of com- 
patibility — the author makes 
no mention of spell-checking. 

As the program is targeted at 
budding playwrights rather 
than existing ones who may 
not be using QLs, a further text 
file is supplied, giving guidance 
on how to write scripts. It gives 
guidelines on what to put into a 


PLAYWRIGHT 


the master disc all you getis a 
copyright symbol, the word 
“Software”, and a piercing 
tone from the QL speaker; 
most people must have forgot- 
ten it exists, so that may be a 
shock. Although the program is 
not copy-protected, the same 
symptoms are likely to occur if 
you change the name of the 
registered buyer. 


No backup 


A single-page introduction 
gives very brief advice on run- 
ning Playwright but not on 
making a back-up copy; the 
separate SuperBasic program 
provided for making a copy is 
not mentioned. Use of the 
DATASPACE TASK program 
— if an “out of memory” mes- 
sage appears when the prog- 
ram is booted — is referred to 
but a little more detail, for less- 
experienced users, would be 
desirable. 

The user is advised to load 
the file containing the user 
guide as a first step once the 
program is running. The guide 
contains 12 full pages of 
advice; it is well-written and 
comprehensive. Some charac- 
ters appearing in the guide are 
there for print formatting and it 
would have been preferable to 
explain their use at the start of 
the document, rather than 
have the new user puzzling 
about their significance. 

It might be assumed that 
available spell-checking prog- 
rams cannot handle Playwright 
files, since there are several 
spelling mistakes, including 
the non-word “zeroise”, in the 
two provided text files; this 
seems out of keeping with the 


script, how to arrange it, avoi- 
dance of “padding”, together 
with a sample script and speci- 
fication. This documentation 
will be very helpful to the 
beginner and is not too simple 
to help the more experienced 
writer. 

Memory of 512KB or more is 
recommended. The program is 
on 3.5in. disc but it can be 
configured to run from Microd- 
rive, floppy or RAM disc. As an 
EXEC-able task, the program 
can be multi-tasked but the 
user may have to do a little 
work to get it to do so. Even 
with 240KB free memory it 
would not run initially with the 
usual program set-up in the 
896kB review system; running 
the supplied Turbo sub-routine 
DATASPACE_TASK reveal- 
ed that the program was set up 
for a data space of 417,792 
bytes and reducing this to 
200KB got the program run- 
ning. 


Set-up 


For users already familiar 
with the Turbo compiler this 
might be a fairly obvious proce- 
dure but the instructions would 
not be sufficient to guide other 
users what to do. Most users 
could be expected to run Play- 
wright on its own and the 
supplier will set it up for the 
required memory configura- 
tion, if advised beforehand by 
the prospective purchaser. 
The value quoted is suitable for 
a 512KB system. 

Before commenting on how 
the program performs its 
intended function, it is worth 
pointing out some _ non- 
theatrical roles. You can 


Import files from Quill, text87 
and The Editor, without the 
typestyle enhancements — 
the program does not provide 
bold, underlined and so on as 
they are apparently not 
required in scripts; a_ fair 
amount of format data from the 
Quill file is left, as it is in other 


-editor programs. SuperBasic 


programs can also be Import- 
ed but the word-wrap function 
places a constraint on line 
length which might be 
unacceptable to some prog- 


Bryan Davies arranges his words with a program 
written for scriptwriters and other specialist scribes. 


rammers. The Import function 
operates decidedly slowly. 
Program lines can be re- 
numbered. the program is sta- 
ted to have been used to aid its 
own development and is said 
to have no GO SUBs or GO 
TOs in the source code. Files 
can be Export-ed in ASCII 
form. 


Curtains 


The initial program screen 
gives an impression similar to 
the opening of theatre curtains. 
The full screen width is not 
used, as the “curtains” remain 
at either side, but scripts are 
less likely than normal word 
processing documents to need 
80-85 characters. A stylised 
character font is used and it 
permits 71 characters before 
word-wrap occurs. The font 
can be changed; deleting or re- 
naming the default font file 
causes the normal QL font to 
be used, or you can design 
your own font to “normal QL 
standard” and give it the name 
of the default file. 

At upper right of the curtain 
area is a date and time indica- 
tor. The text area is 19 lines 
deep. The status area is at the 
bottom, divided into three sec- 
tions. At the very bottom is a 
line giving the necessary ALT 
and cursor key combinations 
to select menus and functions. 
Above that, a box at the left- 
hand side lists functions in 
menu groups of five and one at 
the right-hand side gives infor- 
mation on the requested func- 
tion. 

The menu group can be 
changed by using the left/right 
cursor keys with the ALT key, a 
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total of six menus giving 25 
functions — one menu of five 
positions calls the other 
menus. A function is selected 
by moving the cursor bar to it 
using the up/down keys with 
ALT and then pressing ESC. 
Alternatively, some functions 
are available by keying CTRL 
with an appropriate letter — 
e.g., CTRL+D deletes the cur- 
sor line. Text indenting func- 
tions alternatively are available 
from the F1-F5 keys. Those 
menu items which can be 
selected by alternative keying 
have that keying listed after 
them. Standard text functions 
provided are Mark/Cut/Paste 
(block), Delete (line), Format 
(paragraph), Search, (go to) 
Top/Bottom, Save/Load, 
Import/Export, Directory (flp/ 
mdv/ram). The date/time clock 
can be set quickly from a 
menu. Functions specific to the 
script-writing operation are (go 
to) Next/Last scene, (check/ 


alter) Title, (check list of) 
Roles, (check/alter) Scene 
text, Indentation. The latter 


function allows text indentation 
for Scene, Action, Character, 
Dialogue and Bracket (for 
directions to characters). 


Functions 


Various functions obtained 
from keying CTRL plus one 
alpha character are not listed 
on menus: search Again, Go to 
(marked position), change 
case (upper/lower), Quit (prog- 
ram), (search and) Replace, 
Undelete (line), re-set indenta- 
tions (to defaults), refresh 
screen, join (2 lines) together, 
Zero (re-set) indentation. 

A useful variation of the 
block function is obtained by 
using SHIFT+F2/F4/F5 at the 
end of a block; this causes the 
marked block to be converted 
to the indentation appropriate 
to those function keys (Action/ 
Dialogue/Bracket). This can be 
done with Import-ed text to put 
it into the current script format 
quickly. The Search (and 
Replace) functions are carried- 
out efficiently; the search starts 
from the current cursor posi- 
tion and goes to the end of the 
script but then returns to the 
top of the script and continues 
from there, avoiding the need 
to key-in a specific command 
to start from the top. 

The Go To command can be 
used while marking a block, 
making it a quick job to mark a 
large section to the end of a 
document. Information specific 
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to a script is kept in a Header; 
the title, list of characters, time, 
changes from the indentation 
defaults, printer-control data, 
all reside here. This informa- 
tion becomes evident at print 
time but can be accessed and 
altered from a menu at any 
time. 


New keys 


Although function keying is 
sensible in some ways, the fact 
that key combinations which 
are likely to be already familiar 
from other programs are 
sometimes used for similar 
functions, but sometimes for 
different ones, compels the 
user either to learn a complete 
new set of keying or accept 
rather slower operation by 
using the menus all the time, 
and possibly making a sepa- 
rate “crib sheet”. 

The Tab key moves the 
cursor one word to the right — 
SHIRT+right cursor in Quill or 
The Editor. One apparent 
omission from the list of func- 
tions is a way of “zapping” the 
current file without quitting the 
program. General housekeep- 
ing functions have to be acces- 
sed by returning to Super- 
Basic. 

Manipulation of text is fast, 
with none of the disadvantages 
which plague Quill users. Even 
with several programs loaded, 
cursor movement is steady 
and fast enough. Cut and 
Paste operations are also fast, 
and simple — CTRL+M to 
mark the first block line, cursor 
to the last line, then CTRL+X 
to delete the block. Changing 


data discs reveals that provi- 
sion has not been made for this 
action, the “new” disc making 
the drive an “invalid device”. 
The standard QL key com- 
bination of CTRL+C is used to 
switch between multi-tasking 
programs, of which the Play- 
wright print program can be 
one. A 640KB QL permits 
about 5,000 lines — roughly 
100 pages — in one script file, 
said to be enough for an aver- 
age feature film. The number 
of lines in the current file is 
displayed if the (go to) Bottom 
function is used; the maximum 
number of lines available with 
the set memory allocation is 
displayed in the left-hand sta- 
tus window. If larger scripts are 
required they can be split into 
separate files and merged — 
up to 20 files — at print time. 


Fast driver 


Scripts are apparently sup- 
plied with no typestyle enhan- 
cement and that allows the 
printer-driver routine to be 
fairly simple and fast. The 
current driver set-up is for 
Epson-compatible printers 
only. To use the print routine 
you quit the main program and 
EXEC the print program; para- 
meters can be appended to the 
program name, to alter print 
configuration — e.g., port, 
page length — at print time. 
Alternatively, there is a text file 
which is accessed by the print 


program which can be Import- 
ed into QL Playwright and the 
parameters altered there. 

Print output can be to 
screen, file or printer. Directing 
print to the screen first allows a 
“print preview”, to check that it 
will look satisfactory before- 
hand. During text input there is 
no “page” as such but the print 
program splits the text into 
pages and ensures that there 
are no widow or orphan lines 
created in the process. Like- 
wise, section numbering is 
added automatically by the 
print program, in response to 
codes put into the text. 


Tailored 


The program is well put 
together and runs well. It has 
plenty of facilities, both for its 
intended purpose and for 
general WP use. The flaws are 
minor and excusable at the low 
price. For the budding script 
writer, the saving in time for- 
matting the text is great, com- 
pared to what would be neces- 
sary with other QL WP prog- 
rams, and the way commands 
are tailored to the job in hand 
allows the writer to concentrate 
on the creative activity, rather 
than having to devote attention 
constantly to the demands of 
the program. 


PDQuaLrry. 


SUPER BASIC C-PORT £79 


A re-written version of Basic C-Port - this significant 
program is now ANSI and Lattice compatible. A sophis- 
ticated and fully functioning SuperBASIC translator into 
C. Amongst the advantages of converting to the more 
structured C is the ability to DiscOVER your C-Ported 
SuperBASIC program for use/compilation in IBM/PC 
environment. The package includes a substantial hard- 
copy manual. 


TexTidy at £10 


TexTIDY at a tidy price will tidy any text file, convert 
between QL Quill, DOS Quill, Wordstar and plaintext 
files, with an AUTO option for the lazy user. INADDITION 
you can use TexTIDY in conjuction with QUILL to build or 
edit your SuperBASIC programs. Write in Quill, TexTIDY 
the _doc, and run (and/or compile) your program. 


HARDBACK 
and FINDER at £35 


A unique double act for HARD DISC users. It saves to floppy by 
directory or sub-directory all, selected or only those files which you 
have amended since the previous save. FINDER allows you not 
only to locate files at any directory level but also files containing 
user selected strings. Test it at mains directory level to find any file 
anywhere on your hard disc which contains the word "PDQL" (or 
similar). 


Programs for Everybody 


COMPARE 
FLASHBACK .. 


(with RTM extension) 
PSION PRINTER INSTALLER and Configurator 
enhanced and TURBOcharged 


SPECIAL EDITOR latest edition (extra memory 
required) 

SPELLBOUND and FILEBOUND (compiled version) 
(extra memory required) 

FILEBOUND (send disc/cartridge and s.a.e) 
TASKMASTER (extra memory required) 

PSION SUITE upgrades 

versions 2 35 Quill, Abacus, Easel-Archive version 2.38 
£5 each, send disc/cartridge ands ae 


Recent additions to the list 


Page Designer 2 
LIGHTNING } 
INR ERA Se Sertich cs nit nakceasvanons tearadcanstiduectoisacs £99.00 


TurboQuill+ 
Super Basic C-Port 


HARDBACK and FINDER 
IMAGE PROCESSOR 
CLIP ART for PD2 each 


HARDWARE 


TRUMP CARD .............sccsccccessrcesrsreteneeeneree £249.00 


NEC DISC DRIVES oiccnc.o cece cco. sascseeseesenee £181.00 
(Together £425.00 plus ten discs) 
512k TTUMP Cal .........ccccccsesrrccesssecssersrones £199.00 
(with Disc Drives £350.00) 


256K TPUMP Cal ....06......cccccceccssesessesrsceeses £129.00 
(with Disc Drives £300.00) 


STAR LC-10 


Sprerererrrreer ett i irri terre 


Star LC-24 10 (24 pin - 8MLQ fonts, 
plus Pica, Elite, Itallic, Shadow and 
Outline Print VAriAtIONS ........ceeerereeesreeeereeeee £460.00 


fountext™ 
founted” 
Complete edition: text” + fountext™ + founted” 
typeset” I and II £25 each 2488 


ARCHIVE DATABASE ANALYSER 
ARCHIVE SCREEN FORMAT PRINTER 


PDQC — a fully fledged C Compiler (full K & R standard) 
and fully compatible with SUPER BASIC C-PORT £79.00 
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PD OL Computer Systems and Software 


UNIT 1, HEATON HOUSE CAMDENSTREET BIRMINGHAM B13BZ 021 200 2313 


MAKE THE MOST OF YOUR QL AND THOR 


for home and business use — Order from list or write for current catalogue. Prices include VAT and postage within the 
UK. Cheques with orders to, and full descriptive list available from PDQL. Please state details of toolkit, extended 
memory and or disc. 


Your ticket to DiscOVER 
QL to IBM 
ore | 


wo 


RETURN 


Any Day 


£29.50 


CLASS 


PDQ PAYROLL 
PAYROLL SUPPORT 


-+-£20p.a. 


Takes the aches out of producing the weekly pay packets. Caters 
for up to 45 employees in a standard QL; up to 99 with extended 
memory. Handles all aspects AND reports for PAYE purposes. 
Pre-printed payslips available. 


The printer driver you have been waiting for: now youcan print from 
a Screen Dump, Front Page, DeskTop Publisher, Page Designer 
2 or Professional Publisher on any dot-matrix printer compatible 
with the QL. Very simple to install. Can rescale your graphics 
horizontally/vertically and it can print sideways. 


Displays in character, HEX or decimal any differences between 
two supposedly identical files, each sector containing a mismatch 
shown on screen, reposition by number and magic panel align- 
mentto continue the scan. Program line numbers can be ignored 


HOME BUDGET 


ee 


A user friendly (Q liberated) domestic account program AND tax 
calculator with easy to enter tax and allowances changes. 


has been re-born. Version 2 has many added features; wander 
through the disc sector by sector, OR every third sector; print by 
sector OR create a mirror-image of the file on disc; start and end 
of file display.Easy to use. 1989 Lazarus purchasers - return 
master for FREE upgrade 


RECOVER... 


Archive on the Mend. The only program dedicated to the RECOV- 
ERY of lost Archive database files. Easy to use RECOVER creates 
an export file for importing into ARCHIVE. 


ARCHIVE TUTOR 


An interactive tutorial program to teach you all you want to know, 
all you should know and everything the QL User Guide left out 
about Archive. Running.as an Archive application the program 
procedure files are deliberately made available to you so that you 
can “borrow” from them if you so wish 
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DiscOVER is the essential program for transferring any 
file EITHER WAY between QL and IBM format. NO 
CABLES NEEDED. NOSIDE-by-SIDE MACHINES. Run 
DiscOVER, select to or from the QL, transfer all or cursor 
selected files. Features include optional symbol trans- 
late; delete file; automatic file-name change for IBM/QL 
compatibility. Available on 3.5 or 5.25 disc 


PDQL have a larger version including CPM and BBC 
transfer facilities as well as IBM - Multi-DiscOVER 


39.00 
XREF 200 at £20.00 


All the features of PDQ-Xref (glossary of user-defined words, line 
numbers for each occurence, key words used, warning reports). 
Plus a two part procedure trace to indicate the dynamic call 
hierarchy. In other words all calls are reported, by and from whom. 
In addition a step-ladder report indicates at what level of the 
program each callis made. PDQ-Xref is still available at £15 - To 
upgrade from PDQ-Xref send master, sae and £5. 


ACCOUNTS MADE EASY BY PDQL 


CASH TRADER UPGRAGE 
The Accounts program built for the small business. It provides a 
complete and easy-to-enter Accounting Routine with instant up-to- 
date Balance sheet, Profit and Loss A/C, Audit Trail, VAT Report 
and VAT Return as well as a Trial Balance. 
Accountants use it - nuff said! 

For new users 

Quest users (send boot cartridge) 

Annual Support Scheme 

CT 2.4 Upgrade for Upgrade users 

send master disc/cartridges 

(Support Scheme Members) 

CT ANALYSER (needing extended memory) 
ls the essential companion to Cash Trader 


(versions 2.1 and later) 
TRADING ACCOUNTS 
The flexible Accounts package - Cash Trader Data files easily 
converted - built at the request of Businessmen with extra book- 
keeping needs. 
At least 256K memory required. 
All the advantages of Cash Trader upgrade plus many new 
features - navigation by initial letter as well as scrolling; varying 
size Groups a feature; Analyser included with other features 
designed to speed up both book-keeping and reporting 


Upgrade customers with CT Analyser 
Support Scheme members with CT Analyser 


IBM EMULATOR FOR THE QL.tneE soLuTIoNn 


The DP IBM-MSDOS Emulator - With MSDOS V.4.01 £129.00 
- and without £79.00 


HARD DISCS FOR THE QL 


PDQL is stocking the Miracle 30mg HARD DISC - £399 


ast month’s _ string-matching 

utility has a role to play in a 

variety of applications. The 

most immediately obvious is to 
search for records in a database but word 
processors, spreadsheets and file mana- 
gers all need searching facilities of one 
kind or another. Resisting the temptation 
to develop a fully-fledged database merely 
to demonstrate string-matching in action, 
instead I have written a relatively simple 
and useful file-searching program. 

Scattered among my 150 or so discs and 
Microdrives are master copies of prog- 
rams, partly-developed programs, half- 
forgotten data files, old word processing 
documents and back-ups for almost every- 
thing. What there is not, despite my best 
efforts, is a system which allows me to find 
a given file with unerring accuracy. I 
suspect that most readers, with the possi- 
ble exception of the pathalogically neat, 
are in the same position. Accepting that it 
is too late to develop a program which 
enforces a logical file storage system, what 
is now needed is a program to search for a 
file whose name is only dimly remem- 
bered and whose location is completely 
forgotten. 

The file-seeking program listed uses last 
month’s string-matching routine to dis- 
play selected filenames on the screen and 
allows users to view or print the file 
contents and even opt to delete them. 
Lists of filenames can also be sent to the 
printer as a permanent record of what 
currently exists on various media. As is 
usual in any pre-programming analysis, 
one of the first tasks was to impose some 
constraints, as follows: 


* The screen displays had to suit television 
sets as well as monitors. 

* No additional memory or toolkits were 
assumed to be available. 

* The program had to be brief enough to 
type-in easily; it has fewer than 300 lines 
even when last month’s routines are 
included. 

* The program had to perform a worth- 
while task. 


The analysis revealed that the program 
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SUPER 
BASIC 


Are you finding your disc library 
a little too large to cope with? 
Bring order to chaos with Mike 


Lloyd’s file-searching utility. 


MEOTUM 
NIL .PROGZA 


DEVICE 


MNEOTUNM 


Print 


List? 


NHjJIL_PRO 
NJIL_PROG2 


dynamics would form three distinct levels. 
The first level could be described as being 
“pre-search” in which the display and 
variables are initialised, a search pattern is 
declared and a device chosen. The second 
level is concerned with searching a disc or 
Microdrive for filenames which match the 
declared search pattern. The third level 
concentrates on viewing, printing or delet- 
ing individual files. Only the first level is 
tackled this month — the remaining pair 
occupy about as many program lines 
although they are considerably more 
complex in their logic. 


Hierarchy 


The existence of such a hierarchy 
influenced the development of the menu 
structure used throughout the program 
but it was not an appropriate frame on 
which to hang the program design. 
Instead, I used the “building block” 
programming method, sometimes called 
the bottom-up strategy, in contrast to the 
more familiar top-down programming. 

Top-down programming takes the fun- 
damental aim of a program and splits it 


FPATTEFHW 


FrLe 
MIL_PROGZA match 
NMIL_PROGZ2A match_Wed 
MHJIL_PROG2A oldmatch 
MHJIL_PROG2A match _Wedl 
MIL_PROGZA neumatch 
NJIL_PR newmatch_ SAT 


A 
A minmatch2 
A watch_glu 


into its major constituents which are, in 
turn, divided and sub-divided to form a 
hierarchy. This process builds a kind of 
pyramid at the base of which are a large 
number of relatively simple routines. One 
difficulty with this design strategy is that 
largely identical requirements might exist 
at two parts of the pyramid which, if we 
are not careful, might result in two 
separate routines being written when one 
could have done. 

The consequences of duplicating rou- 
tines are that the program will be larger 
than necessary, the competing routines 
might confuse the user by being slightly 
inconsistent and the tasks of maintaining 
and improving the code are made more 
difficult. 

The building-block approach can avoid 
those problems by identifying fundamen- 
tal requirements and producing a set of 
general-purpose routines to meet them. 
The advantages are that less code is 
written and the program is likely to be 
more consistent and therefore easier to 
use and to maintain. The disadvantages 
are that general-purpose routines might 
not be ideal for every occasion and their 
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generality might increase their length or 
complexity. 

The building-block approach produces 
not a pyramid of routines but something 
more akin to a diamond with the lower 
point formed from utility procedures 
called from a variety of middle-order 
routines which are linked by the controll- 
ing hierarchy which forms the top point of 
the diamond. 


Compromise 


There is no compunction to use one 
programming method to the total exclu- 
sion of another. Programmers need to 
reach their own compromise between the 
purity of top-down programming and the 
utilitarian efficiency of building-block 
programming. The building blocks 
needed by the file-searching program 
handle windows, menus, printing opera- 
tions, file operations, and so on. Some of 
them rely on others; for instance, the 
menu display requires a window to be 
drawn. The most basic modules were 
therefore developed first and as the more 
complicated modules were added to the 
program it was necessary occasionally to 


Ligrins ? Listing 7 
/4@@ MODE 4: WINDOW 512, 256, 0, 700 DEFine PROCedure Pattern 
WER SESPER. 2h B81, CLS 705 Draw_Wndo S, 26, 1, 252, 16, 4, "PATTERN" 
et S95) 3s SOP RNS CO 718 PRINT#S, Patterns 
pio * a * Reis he anh 715 END DEFine Pattern 
= $ . ser 
420 F = 6 
rhe ueeghca? = oa Listing 8 
—_ " " 
her ea ndhiiek ce pia be 880 DEFine PROCedure Device ‘a st 
Ae Mediums a 805 Draw_Wndo S, 10, 1, 3@, 16, 4,"DEVICE 
444 Free = @®: Used = @ 810 PRINT#S, Devs 
448 Pattern: Device: Medium 815 ‘END: DEFine ‘Device 
452 Display: Space: Menu 1 
456 REPeat Loop Listing 9 
460 key = Bar_Menu (max) 
BOS * SERGCy RN) Key 986 DEFine PROCedure Medium 
468 = as New _Eatrern 905 Draw_Wndo S, 10, 1, 148, 16, 4, "MEDIUM" 
472 = 2: New_Device 91@ PRINT#S, Mediums 
476 = Si 915 END DEFine Medium 
480 Examine = key -3 
484 Search_Mode 
488 = 5, @: EXIT Loop Listing 10 
492 END SELect 
1000 DEFine PROCedure Space 
ei lal as ta 1005 Draw_Wndo S, 10, 2, 30, 56, 4, "STATUS" 
1010 PRINT#S, TO 4 - LEN(Free); Free; "K Free" 
1015 PRINT#S, TO 4 - LEN(Used); Used; "K Used" 
Listing 5 1020 END DEFine Space 
500 DEFine PROCedure Draw_Wndo (ch, ac, dn, Listing 11 
Xpos, Ypos, Col, Title$) 
505 cerbbobibehd ac*¥8+20, dn*10+24, Xpos, Ypos 1100 DEFine PROCedure Menu (Type) 
510 PAPER#ch, 2, @: INK#ch, 7: CLS#ch 1105 LOCal n, Title$, Col 
515 BORDER#ch, 1, @: BORDER#ch, 4 1110  WINDOW#M, 120, 146, 20, 108 
520 CSIZEf#fch, 2. @: PRINT#ch, Title$ 1115 PAPER#M, 2,4,0: CLS#M 
525 WINDOW#ch, ac*®8+8, dn*10+4, Xpos+6, Ypos+16 1128 IF Type = ®: RETurn 
53@ PAPER#ch, Col: CLS#ch: BORDER#ch, 2 1125 IF Type > 4: Message (Type -4) * 10 
535 CSIZE#ch, 1, 0: INK#ch, 7 * (Col <4) 1130 RESTORE 1145 + INT (Type) * 5 
540 END DEFine Draw_Wndo 1135 READ max, Col, Title$ 
1140 Draw_Wndo M, 10, max, 38, 176, Col, Title$ 
1145 FOR n = 1 TO max: READ a$: PRINT#M, af 
1150 DATA 5, 4, "MAIN", “Pattern”, "Device", 
"List only", "Examine", "Quit" 
Listing 6 1155 DATA 4, 4, “DEVICES", "flp1_", "flp2_", 
"mdv1i_", "mav2_" 
608 DEFine PROCedure Display 1160 DATA 5, 4, "FILE", "Continue", "View", 
605 Draw_Wndo 1,40,17, 140,56, @,"MEDIUM FILE" “Delete, "Print", "Quit" 
619 DIM Media$ (56, 10), File$ (56, 48) 1165 DATA 2. 7, "CONFIRM", "No", "Yes" 
615 END DEFine Display 1170 END DEFine Menu 
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adjust them slightly to cope with an 
unexpected situation. 

Building blocks are not just procedure 
and function definitions but also include 
communication channels and major vari- 
ables. Some of them are established in the 
opening lines of the program shown in 
listing four — listings one to three being the 
string matching routines published last 
month. As an aide memoire the channels 
used by the program are identified by a 
letter rather than a digit, as follows: 


S = System, used for displays of system 
information such as the name of the 
current device. 

M = Menu, the window devoted to the 
menu display. 

P = Printer. 

F = File, the channel opened to files saved 
on discs or Microdrives. 

T = Temp file, the channel opened to the 
temporary file containing the directory of 
the current medium. 


Six global variables are declared. Both 
Pattern$, the search string, and Dev$, the 
current device, can be defined by the user; 
the values shown are the defaults which 


you might wish to change to suit your 
circumstances. TempFile$ is the file used 
to store the directory of the current 
medium. In the listing it is placed on a 
RAM disc but it could as easily be 
renamed “mdvl__TempFile$” or even 
Dev$ & “TempFile$”. The program works 
very quickly with a RAM disc, acceptably 
quickly with a floppy disc and more slowly 
with a Microdrive. 

The values of the final three variables 
are determined by the medium placed in 
the current device. Medium$ is the name 
given to it when it was formatted; the two 
numeric variables hold the amount of 
space on the medium used and the remain- 
ing measured in kilobytes rather than 
sectors. The remainder of the main seg- 
ment calls up the individual displays and 
then activates the main menu. 


Windows 


Most QL software makes full use of the 
multiple display windows available via 
Qdos and this program is no exception, 
even though it could have been designed 
to use only one window. Much of the 
process of defining a window is repetitive 
and so can be placed in a single procedure 
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Listing 12 


1200 
1265 
1210 
t2e15 
1220 
1225 
1230 
1235 
1240 
12u5 
1250 
1255 
1260 
1265 
1270 


DEFine FuNction 
LOCal n, key, Loop 
n= 0 
REPeat Loop 
OVER#M, -1: BLOCK#M, 
key = KEYROW(1): key = 
BLOCK#M, 8@, 10, 8, n*1@, 
SELect ON key 
n 
n 
RETurn n + 1 
RETurn @ 


88, 
CODE 


32: 
27: 
END SELect 
END REPeat Loop 
END DEFine Bar_Menu 


Listing 13 


1300 DEFine PROCedure Message (Type) 
7. 


13@5 Draw_Wndo S, 19, 
1310 SELect ON Type 
1312 = 1: PRINT#S, 
1314 PRINT#S, 
1316 PRINT#S; 
1320 PRINT#S; 
1324 PRINT#S; 


3. 30, 108, 
"Is "; Devs 
“ready for" \ 
"Print the” \ 
"Delete" », 


"Print" 9 


2: 
a 
a: 


called with different parameters. Listing 
five takes seven parameters which 
describe the location, dimension, colour, 
title and channel for each window. As in 
other SuperBasic programs, the dimen- 
sions of the window are given in terms of 
character positions rather than in pixels. 
A common character size of 8x10 pixels — 
CSize 1,0 — is used throughout the prog- 
ram. 

The window has a thin black border and 
a larger red/black background area, at the 
top of which is printed the title of the 
window. The print area is then superim- 
posed on the background. The ink colour 
is chosen to give maximum contrast with 
the paper colour. 

All that remains is to define procedures 
to produce the required displays. Listings 
six to 10 perform this task and any changes 
to the layout of the screen can be effected 
by altering the values in the various 
Draw__Wndo statements. 


Odd 


The next three listings are all that is 
necessary to activate the menu system. 
Menu items are highlighted by a bar 
cursor controlled by the up and down 
arrow keys. The highlighted option is 
selected by pressing either the space bar or 
the Enter key. This type of menu is 
particularly common due to the increased 
use of mice which can drag the cursor bar 
through a menu list. 

In the original design for the program 
the menu window was a constant size 
which looked slightly odd when it showed 
only two options in an area designed for 
five. The revised routine adjusts the 
window height according to the number of 
menu options. Line 1110 overprints the 
whole menu area with background colour 
to keep the display tidy when a small menu 
follows a larger one. The menu can be 
removed entirely by passing a zero to the 
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Bar_Menu (max) 


10, 
7: 


(n-1) MOD max 
(n+1t) MOD max 


1326 = 5: 
138@ END SELect 


Listing 14 


@, n¥*10, 7 
(INKEY$ (-1)) 
OVER#M, @ 


1400 
1405 
1418 
1415 
1420 
1425 
1430 


LOCal Loop, 


Menu @: 
IF Bar_Menu 
Pattern: 


Listing 15 


1580 
15@5 
15108 
1925 
1520 
1525 = 1: 
1530 2: 
1535 3: Devs 
1540 = 4&4: Devs 
1545 END SELect 

155@ Device: 
pe ey 


LOCal key, 
Menu 2 
key = 


Devs 
Dev$ 


"MESSAGE" 


"searching?" 
rst?" 
File$(x);"2" 
File$(xX) 


procedure; it is bad practice to display a 
menu which is not available. 

Some menus are self-explanatory, while 
others need to be placed in context. In this 
program only the “Confirm” menu falls 
into this category; what the user is asked 
to confirm depends on the circumstances. 
A neat way of coping with this require- 
ment without adding an extra parameter 
to the procedure is to use non-integer 
values for Type. 

For normal menus, Type is an integer 
but for the “Confirm” menu Type can be 
4.0, 4.1, 4.2 and so on with the fractional 
value referring to the message to be 
displayed alongside the menu. This is 
controlled in line 1125, which calls the 


“Despite my efforts, I 
have no system to find 
a file with unerring 
accuracy. I suspect most 
readers, except the 
pathologically neat, are 
in the same position.” 


Message procedure at listing 13. The 
principle can be extended to reduce the 
number of parameters in a variety of 
procedures. A screen location could be 
described as Spot 25. /2 rather than as Spot 
Day IZ. 

The menu remains inert until listing 12 
is called. In this function the cursor bar is 
drawn as a block using the “exclusive or” 
screen mode. Rather than obliterating a 
menu line it reverses the colours to 
highlight it. Different effects can be 
obtained by superimposing a “red” or 
“green” block, although red and green 
might not be the colours obtained. 

After the block is drawn the program 
pauses to detect a keypress, following 
which the cursor bar is removed by 


PRINT#S; 


Draw_Wndo S, 


PRINT#S; 
END DEFine New_Pattern 


"Continue" \ "listing?" 


1399 END DEFine Message 


DEFine PROCedure New_Pattern 


max, Temp$ 
26,1, 250,16, 
INPUT#S, Temps: 
(2) = 2: Pattern$ = 
Pattern$: 


@,"NEW PATTERN" 
Menu 4 
Temp$ 
Menu 1 


DEFine PROCedure New_Device 
as 


Bar_Menu (max) 
SELect ON key 


"elp1i_" 
"Pip2_" 
"mavi_" 
"mav2_" 


a | 


Menu 1 
END DEFine New_Device 


overdrawing it, another useful character- 
istic of the “exclusive or” mode. The bar 
position is controlled by detecting the 
pressing of the up and down cursor keys. 
The use of the modulus operator causes 
the cursor bar to cycle round the options 
when the top or bottom item is reached. If 
the spacebar or Enter key is pressed the 
current location of the cursor is returned 
to the calling statement. The escape key 
returns a value of zero. 

The loop at the end of listing four shows 
one way in which a menu is activated. This 
menu can be used repeatedly and so the 
options are contained in a loop. Not all 
menus work like this. In listing 14 the user 
is invited to enter a new search pattern. 
The new pattern is held in a temporary 
variable until the user confirms that it is 
correct. The “Confirm” menu is placed on 
the screen, in this instance with no 
accompanying message, and activated by 
calling the Bar_Menu function in an IF 
statement. If the function returns a 2, 
indicating a “Yes” response, the new 
search pattern replaces the old one. With 
any other value the old search pattern is 
restored. 

Another menu style is demonstrated in 
listing 15. When users choose the 
“Device” option from the main menu this 
procedure displays a list of possible 
devices, which can be altered to reflect 
your computer system. As only one option 
can be chosen the menu is not contained in 
a loop. 

The flexibility of this menu design can 
be increased further by allowing for more 
than one column of options to be dis- 
played and permitting lateral movement 
of the cursor bar using the left and right 
arrow keys. The amendments required to 
listings 11 and 12 are relatively small. 


@ Next month the project will be completed 
by adding the code necessary to read disc 
directories and control program output. 


Sinclaix/QL World October 1989 


CARTRIDGE ASSEMBLER 
A two-dimensional CAD package DOCTOR WORKBENCH 


suitable for all general, scientific 
and engineering applications 
Create accurate, finely detailed 
plans, diagrams or designs. 
%* Zoom in and out. 

3% Library of drawing tools 
a Fast, multi-width output 
#* 2 screen modes 


Essential for all QL owners. 

a Rescue files from damaged 
cartridges 

a Recover newly deleted files 

# Recover files with damaged 
blocks 

3% And much more 


Identify 500+ stars and planets with 
this impressive astronomy program. 
COSMOS displays accurate star maps 
for any date and time anywhere 
in the world. View the solar 
system, the moons of 


A complete set of tools for the 
machine code programmer. 
Combines assembler, monitor and 
screen editor. Dual screen to assist 
debugging of graphics programs, 
can operate on RAM or disc files. 
Compact and easy to use. 


(DEATHSTRIKE, 


An exciting ‘Scramble’ game. 
Maneuvre your ship through alien 
territory, gain points by hitting 
targets with bombs and missiles. 
Your final objective is to destroy the 
mothership with an accurately 
placed bomb. A fast addictive game 
1 with excellent graphics. 


STRIP POKER 


Challenge the luscious Denise to a 
riveting game of cards. 


Peressc | imi sent) = 


ves wetting fen! 
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house 


C Fass 


Stone Street, North Stanford, Ashford, 


TALENT + ‘est 12s cor. 


CONNECT 
Tel:0303 813883 Fax: 0303 812892 Telex: 966676 PMFAB G | EN ©) EUROCARD 


REBEL ELECTRONICS LTD 


HARD DISK PRODUCTS FOR YOUR QL 


FLEXIBLE FAST RELIABLE 
RB1000 — WINCHESTER DISK CONTROLLER £195 (£225) 


@ HIGH PERFORMANCE WESTERN RB2000 — CONTROLLER + BOXED 
DIGITAL CHIPSET I0Mb DRIVE: PSU =... na £399 (£430) 

& STANDARD PC COMPATIBLE ST506/ NB: 30Mb and 40Mb Versions are also available 
ST412 DISK DRIVE INTERFACE 

@ 32KBYTE SECTOR BUFFER RB50E — 4 WAY BUFFERED 

@ PLUGS INTO OL EXPANSION PORT BAGK PLANE. 2 iscicatsecests aes -nseeeeese £83 (£85) 
OR BACKPLANE. 

@ CONTROLS UP TO TWO PHYSICAL RB500E — BOXED 4-WAY BACKPLANE, 
DISK DRIVES fa Yove =>) Mama chee el pram” ane eS hy £192 (£195) 


ORDER NOW BEFORE NOVEMBER 1st PRICE CHANGE (shown in brackets) 
ALL PRICES INCLUDE VAT AND P&P — TO ORDER WRITE OR PHONE TO: 
Mastercard, Visa 
Eimear Assad REBEL ELECTRONICS LTD 
(ec}ecml A&) 12 YORK PLACE, LEEDS, LS1 2DS 
ropa 0757 86630/0904 708073 


(State number and expiry date) 
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Reasons Why You Should 
Subscribe Today! 
cone oct to your door at 


> NO EXTRA COST* 
we pay the post! 
Avoid ; 
is Never again worry abo! 
D your local newsagent 


—_ < selling out. 
See 
— M 
Save Avoid any price 
increases for the next 
12 issues by subscribing. 


2 | ; 
F R E E MAGAZINE BINDER 


to hold the next 12 issues of your 
favourite magazine. 


> This fabulous offer can’t last forever so 
act NOW! Don’t forget, if you are 
currently a subscriber you too can take 
advantage of this special deal by 
renewing TODAY! 


UK: £21.00; EUROPE: £24.70; MIDDLE EAST: £25.80; 
FAR EAST: £27.60; REST OF WORLD: £26.20 or USA: $45.00. 


Airmail Rates on Request 
*Overseas subscription rates include postage 


Please begin my subscription to Sinclair QL World (and please rush me my FREE magazine binder) 
withthe: a... issue. 

Ienclose my cheque/money order for £—_______— made payable to: FOCUS MAGAZINES LIMITED 
or debit my Access/Visa No. 


«. cccuecguseseeecdctecsesenccencedacmense tensqenecnscoveceses sen cpamemmnabne afsasendwscocwaneshenbene. -At° °° (aaa aa ti) Siam 


Signed ...........sseeeeeesesseecssneeenennseeetnenneneaneeanees Dat@scccecsccscccsovcsecsscsscocccccsscescesccenoeeSueaueeae SQLW10 


Please send this form with your remittance to: Judi Gallon, Focus Magazines, Greencoat House, 
Francis Street, London SW1P 1DG. 
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INCLUDES 

FREE UK 

DELIVERY 
The Amiga 500 is one of a new breed of technologically 
advanced computers, which are now emerging as the new 
standard for home computing, based around the new Motorola 
68000 chip. The A500 has 512K RAM and a 1Mbyte double 
sided disk drive built-in. It can be connected directly to a wide 
range of monitors, or to a domestic TV set through a TV 
modulator. Designed with the user in mind, the A500 features a 
user friendly WIMP environment and comes supplied with a free 
mouse. And, when you buy your Amiga from Silica Shop, the 
UK's No1 Amiga specialists, you will experience an after sales 
service that is second to none, including a technical support 
helpline and free newsletters and price lists. Return the coupon 
: below for our current information pack, which will give details of 
FREE! - WIZBALL - by Ocean the Silica service and the very latest Silica Amiga ohare E&OE 


PHOTON PAINT PACK 


A500 Computer £399.99 
TV Modulator £24.99 
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FREE! - THUNDERCATS - by Elite 
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Before you decide when to buy your new Commodore Amiga computer 
we suggest you consider very carefully WHERE you buy it There are 
MANY companies who can offer you a computer, a few peripherals and 
the top ten selling titles. There are FEWER companies who can offer a 


When you buy the Amiga 500 from Silica Shop, you w 
et a high power, value f ney computer, we will also give 
you some spectacular free g First of all, we are now includ 
dulator will stand alone keyboard, s 


wide range of products for your computer as well as expert advice and Pp P . £ a 
help when you need it. There is ONLY ONE company who can provide hoton aint 69.95 car our Amiga nt into your TV at home (the 
y 

the largest range of Amiga related products in the UK, a full time Amiga S P. k £ 29 mo 10t included with the A500+A1084S pack as it is © 

specialist technical helpline and in-depth after sales support, including Ten tar ac 2 .50 req r use with monitors yndly, we have added a tree 

free newsletters and brochures delivered t yr tor as long as you saan 6a rf f Pr ton Paint n adi yraphics pac age with ar 

require after you purchase your co t one company is Silica O . copy hoton Pe an é graphics package wi 1 
: T TAL RRP: £724.43 RRP of £69.95. Last by no means least!), so that can be 


ome uter field for ter 


Shop. We nave been established in the 


and can now claim to meet our customers requ ts with an accuracy LESS DISC SOUNT: £325 43 p and running st away, we are giving away the sational 
and understanding which is second to none. Here are just some of the bs 4 2 TENSTAR GAMES PACK with every A500 purchased at Silica 
things we can offer you This pack features ten top Amiga titles which have a 


bined RRP of nearly £230! Return the coupon tor details 


PACK PRICE )": £399 


1084S MONITOR PACK 


A500 Computer £399.99 


THE FULL STOCK RANGE: The largest range of Amiga 


related peripherals, accessories, books and software in the UK 


AFTER SALES SUPPORT: The staff at Silica Shop are 
dedicated to help you to get the best from your Amiga 


FREE NEWSLETTERS: Mailed direct to your home as 


When you buy your Amiga 500 Amegas £14.95 


soon as we print them, featuring offers and latest releases from Silica Shop, we want to Art Of Chess £24.95 
FREE OVERNIGHT DELIVERY: On all hardware orders || 1084S Colour Monitor £299.99 | | rire oe 7s or Niny we Barbarian, Ult Warrior £19.95 
shipped to Silica Shop customers within the UK mainland i are giving away the TENSTAR Buggy Boy £24.95 

Photon Paint £69.95 GAMES PACK worth nearly Ikari Warriors £24.95 


PRICE MATCH PROMISE: We will normally match our 


competitors offers on a ‘same product same price basis 


£230, absolutely FREE with Insanity Fight £24.95 
every A500 purchased from us Mercenary Comp £19.95 


TenStar Pack £229.50 


FREE TECHNICAL HELPLINE: Full tine eam of Amig TOTAL RRP: £999.43 || 1"~.""%,conw: (21.26 Terrorpods £24.98 

nical experts to help you with your technical queries pe ED : Berd Thundercats £24.95 
: each individually packaged i 

But don’t just take our word for it. Complete and return the LESS DISCOUNT: £350.43 its fe Cari eth insinocaioae Wizball £24.95 


coupon below for our latest Amiga literature and begin to 
experience the Silica Shop specialist Amiga service 


PACK PRICE :;: £649 


To: Silica Shop Ltd.. Dept QLW 10 89. 1-4 The Mews. Hatherley Road. Sidcup. Kent DA14 4DX 


Mr/Mrs/Ms: Initials Surname 


mailing list as ar 
ts and newsletters 
t to our Sidcup 


if you already own an Amiga computer and would like to be registered on 
Amiga user, let us know. We will be pleased to send you copies of our price 
FREE OF CHARGE as they become available. Complete the coupon and re’ 
branch and begin experiencing a specialist Amiga service that is second to none 


Address 


SIDCUP (& Mail Order) 01-309 1111 
1-4 The Mews, Hatherley Road, Sidcup, Kent, DA14 4DX 
OPEN: MON-SAT 9am - 5.30pm LATE NIGHT: FRIDAY 9am - 7pm 


—_ OPEN: MON-SAT 94m = 9.008 
LONDON 01-580 4000 


52 Tottenham Court Road, London, W1P OBA 
OPEN: MON-SAT 9.30am - 6 00pm LATE NIGHT: NONE 


ee ee OSS eee 
LONDON 01-629 1234 ext 3914 al ie 
Seitridges (1st floor), Oxford Street, London, W1A 1AB Do you already own a computer 
OPEN: MON-SAT 9am - 6.00pm LATE NIGHT: THURSDAY 9am - 8pm If so, which one do you own? 


Postcode 


ou may have read from time to 

time of the slightly haphazard 

development of the four Psion 

programs, along with hints and 
allusions to a number of features which 
were implemented in the program but 
which never reached the manual. Quill, 
Abacus and Easel, all being menu-driven, 
will do only what they say they do, I 
assume. The programmable nature of 
Archive, however, leaves plenty of odd 
corners for undocumented features. This 
article reveals the details of some of these 
features and provides examples of how to 
use them in Archive programs. 

Version 2.3 Archive includes a range of 
graphics characters in its character set 
which can be sent to the screen either from 
within a PRINT statement, or using 
SEDIT. Figure one shows the characters 
available and where to find them. If you 
wished to print a bottom left-hand corner 
you could say ‘print chr (227)’. Or if in 
SEDIT, you could type the ‘FS’ key 
followed by ‘d’ and the corner would print 
to the screen. What the FS key does is add 
128 to the code value of the next key 
pressed. 

An additional feature is included in 
SEDIT to make the drawing of boxes and 
borders easier. If you press the Shift plus 
any of the four cursor keys the last 
character typed will be repeated in the 
direction of the cursor key pressed. It is a 
pity Psion saw fit to include only a very 
bare minimum of graphics characters for 
drawing straightforward boxes. A little 
more trouble could have provided the full 
range of IBM graphics characters. 
Instead, most other keys produce either a 
vertical line or a cursor-type block. 


Screen driver 

A more significant omission from the 
manual, available on all version 2 prog- 
rams and perhaps even on version 1 for all 
I know, is the ‘screen driver’. Anyone who 
has used a printer will be familiar, at least 
in part, with the printer driver. A vaguely 
similar process has to take place for 
characters to be printed on the screen. 

Just as there are special printer codes 
which do something other than print a 
letter, there are also special screen codes. 
Figure 1 — Archive 2.3 Graphics characters. 


Epson 
equivelant 


QL FS 
Code _ followed 


Graphics 
Character 


ARCHIVE SE 


Robin 
Stevenson 
delves into 
Archive 

in search 
of more 
features 
undocumented 
in the manual. 


They are all located in the ASCII code 
range 0 to 31, so cannot be typed directly 
from the keyboard. Instead, ‘PRINT 
CHR(X)’ must be used. Some characters 
act as a simple command, e.g., printing 
chr (12) will have the same effect as typing 
CLS — the CLS command causes archive 


to print chr(12) to the screen. 

Other characters require one or more 
‘parameters’. They are other characters 
whose purpose is not to print a letter but to 
carry a value. For example, chr(9) pro- 
vides a TAB function but to use it you 
must also send a further character, spe- 
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will interpret any other following charac- 
ters as letters, or as other screen com- 
mands, depending on their value. 

The full list of screen driver commands 
is: 


chr(1) Set ink colour | parameter — in 
colour 

chr(2) Set paper colour 1 parameter — 
paper colour 


These two look at the first three bits of the 
character for the colour, i.e., chr(0-7). It 
should be possible to save the existing 
colour by setting bit 7 (add 127 to colour 
number), and restore a saved colour with 
chr(64) but this appears not to work. 


chr(19) Delete one character to left — no 
parameters 
chr(20) Define window area 4 parameters 
— line and column numbers, for top left 
inclusive, and bottom right exclusive 
chr(21) Scroll screen window up 1 para- 
meter — No. of lines to scroll 
chr(22) Scroll screen window down 1 
parameter — No. of lines to scroll 
Unfortunately a bug prevents the win- 
dow scrolling down more than 1 line. 
chr(23) Pan screen window to right 1 
parameter — No. of column to pan 
chr(24) Pan screen window to left 1 
parameter No. of columns to pan 
chr(25) Boundary characteristics | para- 
meter — see table in figure 2. 


Figure 2. Boundary wrap characteristics. 


Chr(25) determines how the window behaves when the text reaches the edges 
of the window. The parameter to follow chr(25) can be calculated from this 
table. 

2 3 4 5 
Action if set Action if clear Value to set bit 


Scroll up No scroll up 1 
Scroll down No scroll down 2 
Wrap around No wrap around 4 
Wrap around No wrap around 8 

No Action 16 
Toroidal Progressive 32 
Toroidal Progressive 64 


Boundary 
Bottom 
Top 
Right 
Left 


Right 
Left 


Bits 5 and 6, as numbered in column 1, determine how text will wrap round 
at the end of a line, either continuing on the same line or progressing to the 
next. They apply only if you also set bits 2 and 3 respectively. To calculate the 
character value, add together the value from column 5 or any bit you wish to 
set., €.g., to set bits 0, 2 and 5, leaving the others clear would be 1+4+32 = 
chr(37). Using CLS will re-set the screen to its default values, which are bits 0, 


cifying the column to which you wish to 
tabulate. If this is, say, column 65 you 
would print chr(9)+chr(65). Chr(65) is 
the letter ‘A’ but in this context that is 
irrelevant; ‘Archive is interested only in 
its ASCII value. Having read the required 
number of parameters the screen driver 
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1, 2 and 3 set, and the others clear. 


Instead chr (64) sets paper to 0, or in to 7, 
when used. 


chr(4) Repeat characters 2 parameters — 
the character required and the number of 
repetitions. 
chr(5) Toggle underline on/off no para- 
meters 
chr(6) Move cursor one column right no 
parameters 
chr(8) Move cursor one column left — no 
parameters 
chr(9) Tab cursor 1 parameter — the 
required column No. 
chr(10) Move cursor down one line — no 
parameters 
chr(11) Move cursor up one line — no 
parameters 
chr(12) Clear screen window — no para- 
meters 
chr(13) Move cursor to left side — no 
parameters 
chr(14) Switch cursor on — no parameters 
chr(15) Switch cursor off — no parameters 
chr(18) Select screen display type | para- 
meter 
Parameter chr(0) — Normal ink and 
paper characteristics. 
Parameter chr(1)— Overprint—current 
ink, with ‘transparent’ paper. 
Parameter chr(2) — Exclusive-or of the 
character and existing display. 


chr(26) Swap ink and paper colours no 
parameters 
chr(27)) Escape eode, followed by letter: 
A: Clears window from cursor to end of 
line; B: Clears window from cursor to end 
of window; C: Saves the current cursor 
position; D: Restores cursor of 
previously-saved position; E: Scroll win- 
dow up one from top to cursor line; F: 
Scroll window up one from bottom to 
cursor line; G: Scroll window down one 
from top to cursor line; H: Scroll window 
down one from bottom to cursor line; 
chr(28) Combined CR and LF —- no 
parameters 
chr(29) Pass through | parameter — which 
is sent to screen, instead of being proces- 
sed by the screen driver. This would be 
useful only if there were also graphics 
characters in the 0 to 31 range. 


chr(30) Move cursor to top left — no 
parameters 

chr(31) Position the cursor 2 parameters — 
the column and line co-ordinates 
required, the other way round from the 
‘AT’ command. 


The range of programming possibilities 
offered by the screen driver is enormous. 
It provides the building blocks for almost 
any screen control you may require, 
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though not very friendly ones it must be 
admitted. It is not completely finished 
code, either. Characters 3, 16 and 17 are 
not in this list and perform no discernable 
function, yet they generate an error if they 
do not have a parameter sent with them. 
More seriously, if you send the escape 
code, chr(27), with any letter other than 


the eight listed Archive will hang and you 
will have to re-set the QL, with possibly 
disastrous consequences for any files left 
open. 

Examples of how to use some of the 
features in the screen driver are provided 
in figure three. Proc window is a way to 
make the windowing facility a little more 


friendly. The a and b parameters are the 
width and depth of the required window, 
with x and y as the column and line 
numbers of the top left-hand corner. It is 
used like the SuperBasic window com- 
mand but using character co-ordinates 
instead of pixels. 

To use the whole screen, use WIN- 


Type in the program as shown (you can leave out any REM statements), and save it as “demo”. You can see the demonstration by 
typing RUN “demo”, or having loaded it, by typing START. 


proc effects 
rem example title screen, using logo and window features 
local wl,w2: let wl=0: let w2=0: mode 1,8 
print at 12,5;rept("M",30); at 3,45;rept ("M", 30) 
print at 12,5;chr(18)+chr(2);rept("V", 30); at 3,45;rept ("V", 30) ;chr(18)+chr (0) 
while wl<60 
window;15,5,wl+5,w2: print logo$ 
let wl=wl+0.2+sqr(wl): let w2=w2+1 
endwhile :window;80,25,0,0 
input at 23,30;"Press ENTER to continue ";temp$: paper 2: let wl=1l 
while wl<15: print chr(21)+chr(2);chr(23)+chr(2);: paper 0 
let wl=wl+l: endwhile 
endproc 
proc logo 
rem String variable, logo$, prints itself in top left of window. 
rem Ink and paper and cursor position are then reset. 
local x,y: let x=3: let y=O:rem x,y are co-ordinates for top right corner 
let logo$=chr (15)+chr (27)+"C"+chr (31)+chr (x)+chr (y) 
let logo$=logo$+tchr (2)+chr (128)+chr (1)+chr (132)+chr (234) 
let logo$=logo$+chr (4)+chr (231)+chr (10)+chr (226) +chr (31)+chr (x)+chr(y+1) 
let logo$=logo$+chr(224)+" YOUR OWN "+chr (224)+chr (31)+chr(x)+chr(y+2) 
let logo$=logo$+chr(224)+"  "+chr(26)+" LOGO "+chr(26)+" "+chr(224) 
let logo$=logo$+chr (31)+chr (x)+chr (y+3)+chr (227) +chr (4) +chr (231)+chr (10) 
let logo$=logo$+chr (233)+chr (1)+chr (64)+chr (2)+chr (64)+chr (27)+"D" 
endproc 
proc sampleprint;toprinter 
rem Use sampleprint;1 to send to printer, or sampleprint;0 for screen. 
local gr$,m:rem gr$ contains the graphics characters, m is the required margin 
if toprinter 
spooloff : let gr$=chr (179)+chr (180)+chr (191)+chr (192)+chr (193)+chr (194) 
let gr$=gr$+chr (195)+chr (196)+chr (197) +chr (217) +chr (218) 
let m=10: lprint rept(chr(10),8): else 
let gr$=chr (224)+chr (225) +chr (226) +chr (227) +chr (228) +chr (229)+chr (230) 
let gr$=gr$+chr (231)+chr (232)+chr (233) +chr (234) 
spoolon screen : let m0: endif 
lprint tab m+40;gr$(11)+rept (gr$(8),13)+gr$(3) 
lprint tab m+30;" Our ref "sgr$(1)+" X257 - 0°; tab m+54;gr$(1) 
lprint tab m+40;gr$(7)+rept (gr$(8),13)+gr$(2) 
lprint tab m;date(1); tab m+30;"Your ref ";gr$(1)+" RS36"; 
lprint tab m+40;gr$(4)+rept (gr$(8),13)+gr$(10): lprint 
lprint tab m+20;chr(16)+chr(5)+chr(5) ;"DELIVERY NOTE" ;chr (16)+chr (5)+chr (5) 
lprint : lprint tab m;"Code "sgr$(1);" Item "; tab m+47;gr$(1);" Quantity" 
lprint tab m; rept (gr$(8) ,5):gr$(9) srept (gr$(8) ,41) gr$(9) ;rept (gr$(8),9) 
lprint tab m+5;gr$(1); tab m+47;gr$(1) 
lprint tab m;num(345,5);gr$(1);" Left handed Grommets"; 
if toprinter: lprint chr(12);: endif : spooloff 
endproc 
proc start 
rem demo program to illustrate screen driver & graphics characters. 
logo:effects: mode 1,8 
paper 4: print chr(12);logo$; 


tab m+54;gr$(1) 


tab m+47;gr$(1);num(6,8); 
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window; 58,13,17,2 


sampleprint ;0 
print logos; 
endproc 

proc window;a,b,x,y 


endproc 


DOW; 80,25,0,0. Using the ‘MODE’ 
command will re-set the window accord- 
ingly, as will using EDIT. One feature of 
the window facility when using the full 
screen area is making the trace command 
rather more friendly. If you use MODE 
0,8 the program tracings occur wherever 
the cursor happens to be. If, on the other 
hand, you set MODE 1,8 and then re-size 
the window to 80,25,0,0 you have access 
to the full screen area but the tracings 
contain themselves in the bottom three 
lines. 

Another procedure in figure three is 
proc logo. It puts a string of characters, a 
mix of screen driver instructions and 
printing characters into the variable 
‘logo$’. Having called logo once you can 
maintain your personalised logo, in its 
own little box, in the top left corner of the 
screen, or wherever you choose to posi- 
tion it, by printing ‘logo$;’ at suitable 
points in the program. It will draw the logo 
in the top left corner of the currently- 
defined window, whatever else happens to 
the screen, and leave the cursor back from 
where it came. 

Proc effects is a procedure which uses 
both the Window and Logo features, plus 
a number of other screen driver controls 
to demonstrate a range of screen effects. 
The result might serve as a title screen, 


window; 60,15,16,1: paper 2: cls 


rem a=width, b=height, x,y are co-ordinates o 
print chr (20)+chr(x)+chr (y)+chr(a+x)+chr (bty) ; 


paper 0: print chr(12); at 12,0 


perhaps. Proc sampleprint provides an 
example of a report, using the graphics 
characters, which can be sent to the screen 
or to a dot matrix printer. Version 2.00 
Archive users will get rather clumsy wide 
borders instead of neat lines and boxes 
intended. Provided your printer uses the 
Epson graphics character set it will still 
print on to the page correctly. This 
method of translating from within a 
procedure is necessary because the printer 
driver does not provide sufficient trans- 
lates to convert them all from the printer 
driver. 


Printer driver 


On the subject of the printer driver, 
there are ways of using some of its features 
which do not occur in the manual. The 
translate features are easily understood. 
When you LPRINT a particular charac- 
ter, e.g., chr(96), the printer driver trans- 
lates this into something your printer 
understands, such as a pound sign. What is 
not realised so widely is that all the other 
printer driver features behave in the same 
way, except that they use non-printing 
characters, just like the screen driver. 
Well, almost like the screen driver. Unfor- 
tunately, with two exceptions, the codes 
and their meanings are different. 

Thus chr(10) will generate the End of Line 


Figure 4: A short program to make the sample outputs screen-visible. 


Proc aa 


REM Procedures using chr() to create a 


endproc 
proc logo 


local x,y: let w=51: 


let y=@ 
let logo$=chr(15)+chr(27)+"C" 
(132) +chr(234)+chr(4)+chr(231)+ 
let logo$=logot¢+chr(x) +chr (y+ 
chr(y+2)+chr(224)+" “+ohr(26)+" 


LOGO 


£ top right corner. 


code; chr(15) will toggle between Bold on 
the Bold off; chr(16) does the same for 
Underline; chr(17) for Subscript; chr(18) 
for Superscript; chr(26) generates the 
Postamble code, and chr(29) the Pream- 
ble code. 

The two exceptions are chr(12) and 
chr(9). The first gives the nearest thing a 
printer can get to clearing the screen, 
which is a new sheet of paper. It sends 
sufficient end-of-line codes to fill the page 
length but if you are not using continuous 
Paper gives a prompt for a new sheet of 
paper, on the screen as well. Chr(9) is the 
tab function and, as with the screen driver, 
needs a further character to indicate how 
far to tabulate. Archive then generates 
sufficient spaces to reach that column and 
sends them to the printer. One final point, 
which is documented by Psion, is the 
printer driver ‘pass through’ character 
which is chr(0). If you wish to send control 
codes directly to your printer, instead of 
via the printer driver, each character must 
be preceded by a chr(0). 

The screen and printer driver features 
described give far greater control over any 
output from Archive and help the prog- 
rammer enormously with the presentation 
of information, both on screen and on 
paper. What a pity Psion did not tell us all 
about it at the start. 


window and a logo. 


+chr(31 )+chr(x)+chr(y)4chr(2)4chr(128)+4+chr( 1)4chr 
chr( 19) +chr(226)+chr(31) 
1)+chr(224)+" YOUR OWN " 
“tehr(26)+" “t+tcohr(224) 


tehr(224)4+chr(31)4chr(x)4 


let logo$=logo$+chr(31 )+chr(x)+chr(y+3)4chr(227)+chr(4)+chr(231)+chr( 19) +chr(2 
33)+chr(1)+chr(64) +chr(2)+chr(64)+ehr(27)4+"D" 


endproc 


proc start 
mode @,8 
paper 7: 
window; 8%, 14,9,6 


cls 
Paper 2: ink 4 
cls 
logo 
print logo$ 
endproc 
proc window;a,b,x,y 


print chr(2@)+chr(x)+chr(y) 4chr(at+x)+chr(bty) 


paper 2: els 


endproc 
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ne of the main costs 

of using a computer 

printer is replacing 

the ribbon at fre- 
quent intervals to make sure 
that copy is dense and read- 
able. This is more important 
when using DTP or similar 
programs’ which _ utilise 
graphics dumps to avoid a 
streaky appearance. 

My experience has been that 
the ribbon will always fade 
halfway through an important 
printout and that the ‘new 
cartridge you have just bought 
is either of a different coloured 
ink or no better than the old, 
exhausted one. At best it lasts 
only for about four pages. 


Horror stories 


A re-inking service has been 
tried which gives good results 
provided you can remember to 
pad the envelope sufficiently to 
prevent heavy Post Office rol- 
lers smashing the contents. 

If someone else can re-ink 
the ribbon why can it not be a 
DIY job? It can be done easily. 
In mentioning this to the 
‘experts’, tales were told of 
printheads being damaged, 
special inks being needed and 


RE-INKING 


Dennis Briggs says that you 
can re-ink ribbons yourself. 


Epson LX 8@ printer cartridae 


Fit sponge here, 


Ime hole over 
each sponge. 


Spring. 


Fit sponge here. 


\ 


Orive rollers. 


Tension spring. 


Ribbon chasber. 


all kinds of horror stories but 
none of the ‘experts’ admitted 
to having tried it. 

I tried it using ordinary 
stamp-pad ink at 75 pence per 
bottle with three cartridges 
used in rotation. In four years 
of heavy use, to the extent that 
one ribbon had a hole worn in 
it, perfect results are ensured at 


printout every time. To do the 
modification it is necessary to 
ease the top from the cartridge 
casing very gently so that the 
locating pins are not damaged. 
With the top off, as per dia- 
gram, fit two pieces of foam 
sponge in the spaces provided 
so that the ribbon makes good 
contact with them. One piece 


of sponge as the ink reservoir is 
a minimum with a further piece 
at the ribbon exit to wipe away 
any surplus. 


Perfect results 


A small hole over one of the 
sponges will permit the ink to 
be injected with a small 
syringe; 0.5mil of ink appears 
to be just about correct. 

If you feed in too much ink it 
will run out and make a mess or 
it will make a mess of your 
printouts. If you feed in the 
ink, then run the ribbon 
through before leaving it over- 
night for the liquid to dry, 
perfect results are achieved. 
This is why I advocate the use 
of two or three cartridges. 

For the colour-conscious, 
you can have green, brown, red 
or white printouts at the ready. 
What is the use of white ink? 
Have you never heard of black 
paper? It certainly gets you 
noticed. 

I have not worked out the 
cost of re-inking this way accu- 


rately but is less than two 
pence. The cost is not the 
criterion really it is the 


convenience together with the 
superb results. 


/ LO LO ME LE ET ME A Ms 


OL SUPERTOOLKIT II by Tony Tebby 


THE ULTIMATE OL ENHANCEMENT 


Over 118 Commands:— Full Screen Editor, Key Define Print Using, 
Last Line Recall, Altkey, Job Control, File Handling, Default Director- 
ies, Extended Network 

16k Eprom Cartridge Version 
Configurable Version on Microdrive 


@£ 24.15d 
@£ 23.00d 


MIRACLE SYSTEMS PRODUCTS 


QL Expanderam Ok board, fit your own drams Offer open only while 
stocks last £ 23.00d 
OL Trump Card 768k (Toolkit Il etc) @ £259.90b 
QL Trump Card 512k (Toolkit II etc) 1£213.90b 
QL Trump Card 256k (Toolkit II etc) «u£149.50b 
QLExpanderam 512k Thru Card £133.40b 


QL Expanderam 256k Thru Card af 80.50b 
Drams to suit above 41256/15 @£ 6.90c 
OK Disc Interface (inc talk it to) uf 99.82b 
QL Centronics Printer Interface af 28.75d 
QL Modaptor af 37.95d 


QL HARDWAR 


Single 3.5” Disc Drive & (Own PSU) 97.75a 
Dual 3.5” Disc Drive & (Own PSU) @£188.60a 
Q POWER REG. The only real solution to your QL overheating 
(switched mode power supply run cold) @£ 23.00c 
QL Keyboard Membrane @£ 11.50d 


QEP Ili Advanced Eprom Programmer @£121.90d 
Care Eprom Cartridges each @£ 5.75c 
Eprom 27128 250n/s 16k @E 5.75c¢ 


ULA CHip Z2X8301 @E£ 15.64c 


MAGNETIC MED 


Microdrives (each) @E 2.07 
3.5" (each) d/s disc wf 1.61¢ 
3.5" (10 of) d/s discs wf 13.80¢ 


(State MDV or Disc) 


SOFTWARE 87 (State M or Disc) 


TEXT 87 V.2.00 @£ 45.00d 
FOUNTED 89 @€£ 15.00c 
FOUNTEXT 88 af 25.00c 
TEXT 87/FOUNTED 89/FOUNTEXT 88 @E€ 79.00b 
2488 PRINTER DRIVER a@£ 15.00c 


HOW TO ORDER ALL PRICES INCLUDE VAT 


By Post. Enclose your Cheque/PO made payable to CARE Electronics. 
Or use ACCESS/VISA. Allow 7 days for delivery 


TONY TEBBY SOFTWARE (QJUMP) 


QPAC || new from the house of QJump, a totally new version of 
QRAM and OPAC. Available soon 
Please phone for further details 


QFLP (Micro/P disc interface upgrade) af 14.95d 
QMON Ii Microdrive af 19.950 
QMED (Medic disc interface upgrade) at 14.95d 
QPTR Pointer Interface m/drive a@€ 34.50d 
QPTR Pointer Interface + 3.5" disc @£ 29.90d 
QTYP Type/Spell Checker a@€ 29.90d 


ZITASOFT SOFTWARE by Steve Jones 


LOCKSMITHE copies M/DRIVE — M/DRIVE @f£ 11.50c 
4MATTER + LOCKSMITH copies M/DRIVE — DISC @E£ 23.00c 
The above programs are not for use in the UK. 

SHRIVEL memory shrink prog user definable ie 128k or 192k or 256k 
etc @£ 6.90c 
TOOLCHEST utilities to allow the creation of customised mdv doctor 
prog £ 11.50 


HEAT TRANSFER RIBBONS 


Print your own T-shirt Design. Colour or black and white. Please 
phone for details and prices. 


SIDEWINDER - High resolution printer driver prints full screens 
or parts of screens from postage stamp size to large banners 
Prints sideways, invert, scale, mirror, textinsertion. (@£ 17.25¢ 


SIDEWINDER PLUS -— (for expanded QL’s) includes all the 
features of above, PLUS multiple label printing, desktop 
publishing files and printer driver for 24’ pin plus LC10 and 3x80 
, colour printers. (Please state 3.5" disc or M/D) . a@£ 23.00c 
Upgrade to Sidewinder Plus.... at 8.05¢ 


MONITORS (Price including lead) 


Philips BM7502 Green Hi-Res @£ 89.93a 
Philips CM8833 Colour Med-Res a@£271.41a 
@E£ 69.00b 


Philips AV7300 TV/tuner for above 


READYMADE LEADS 


RGB QL to Phono @£ 5.75¢ 
RGB 8-6 pin DIN @£ 7.13¢ 
RGB 8-7 pin DIN (Hitachi) @£ 7.13¢ 
RGB 8-7 pin DIN (Ferguson) af 7.13¢ 
RGB 8 pin to SCART (Euro) £ 11,50¢ 
6-wayPCC way'‘D' (Printer Ser 1) aft 9.8% 


sD ee 


OPEN 
9am-5pm Mon-Thu 
9am-4pm Fri 


800 ST ALBANS ROAD, 
GARSTON, WATFORD, 
HERTS. WD2-6NL. 
Tel: 0923-672102 


Q POWER 
REGULATOR 


NEW 


SIDEWINDER 


Text®’ 


NOW IN 
STOCK 


Please add carriage 
a=£11.50 
c=£1.38 


b=3.45 
d=£2.30 
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——— DREAMLANDS 


CGH Services present 


G198S Jean-Yves Rout fiac 


Welcome... 


You find yourself standing atop a tall circular pillar hich is some 380 
metres high, Southvard is a great forest eostuand o grey sea,vestuard tal | 
mountains,and northuard a green hilly country.A stairway winds down around 


the pillar, 


Clouds drift slowly across the skies, 


There is a tattered note and some strong rope here. 


dread note 


Tt reads: The Forest Queen needs your help. 


get rope 


NOMMNNMNIANWIIIWIIANWIIINIINIAINMANIIIIINIIIIIIINIINN 


INFORMATION: 
Program: Dreamlands; 
needs min. 250K memory. 


Price: £8, disc only. 
Supplier: CGH Services, 
Cwm Gwen Hall, Pencader, 
Dyfed, Cymru SA39 9HA. 


reamlands, written 
by Jean-Yves Rouf- 
fiac, is the latest and 
also the biggest in a 
line of new adventures to be 
released for the QL by CGH 
Services. Because ofits size, a 
minimum of 256K memory is 
required, although the use of 
text compression techniques 
might have enabled the adven- 
ture to fit unexpanded QLs. 
The adventure is set in a 
fantasy world entered by the 
medium of sleep, where you 
can live out your dreams and 
forget about those everyday 
problems. As the manual 
informs you, this time you 
seem to have got stuck and 
must complete several tasks to 
help people before you can 
return home. 
When you first arrive in this 
world you are dressed only ina 
shirt and trousers — as with 
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normal dreams, you forgot to 
put on shoes — at the top of a 
very tall pillar, with only a 
tattered note and some rope 
for company. The note tells 
you that you must help the 
Forest Queen but gives no 
suggestions as to the type of 
help she needs. 

Finding the Queen is not 
easy, since she is hidden in the 
middle of a maze. Luckily, 
however, the mazes in the 
adventure do not seem too 
difficult, since they contain 
very few locations. This is a 
good point since it means that 
you do not waste a good deal 
of time having to map out a 
huge maze and find your way 
through it several times. 


Get talking 


Once you reach the Queen 
you need to talk to her and find 
what her problem is. Talking to 
characters in the adventure is 
no problem, since you use the 
command ‘Talk to xxx’ and 
they will respond and normally 
tell you something to help in 
your quest. 

There are plenty of charac- 
ters in this dream _ world, 


although some are more 
friendly than others. The range 
of characters includes the 
Queen, a vain dragon, a 
greedy troll and a lovable 
chick. Most of the characters 
will reveal to you a further sub- 
plot which you must solve 
before you can help the Forest 
Queen. 

The place descriptions are 
adequate but are certainly not 
elaborate in their detail. You 
can examine most if not all 
objects you find on your travels 
but do not expect to get too 
many hints about their use in 
this way, since many of the 
descriptions seem _ rather 
pedantic, detailing merely their 
physical appearance; for 
example, examining the tall 
tower at the start gives the 
answer ‘it is VERY tall’. 

The range of problems is 
very wide, with a few which are 
relatively simple for seasoned 
adventurers, such as how to 
cross a river with only a rope 
and a tree on either bank. 


S$ FIWARE FILE 


very quickly to typed-in com- 
mands. The parser seems to 
have a very good range of 
vocabulary, although it is a pity 
it cannot recognise upper- 
case. 


Whole word 


There are one or two minor 
complaints | have about the 
program. It is almost always 
necessary to type-in the whole 
word for objects, which can be 
a little annoying, although the 
ability to refer to previous 
objects by ‘it’ and ‘them’ is a 
help. Although the user inter- 
face for saving and loading is 
very good, presenting a pop- 
up screen and allowing for the 
use of Microdrives, discs and 
RAM drives by the press of a 
key, it is a pity the screen is not 
restored — in V9.8 — and that 
there is no over-write option. 

Overall, the game seems to 
have been very well written, 
with no real bugs | could find 
and is certainly set to keep you 


Rich Mellor follows the fate 
of those who get caught 

in the land of sleep. He 
finds that it is easy to meet 
your death, but also easy to 
save yourself. 


There are also several more 
difficult problems, such as how 
to get items from the top of a 
tower whose stairs will bear no 
weight other than your own. 
The problems seem to have 
been very well thought out, 
with a logical solution to them 
all, and will certainly keep your 
interest beyond a few hours at 
the computer keyboard. 

The adventure seems very 
large. | have visited more than 
100 locations and yet have 
managed to complete only 30 
percent of the game. The size 
of the game does not slow 
progress since it is compiled 
with QLiberator and responds 


entertained for many hours. 
Some graphics would have 
added to the addictiveness of 
the adventure, although that 
would only add to its already 
very large memory require- 
ments. There are many ways 
in which you can meet your 
death in this fantasy world but 
the ease of saving, plus the 
ability to choose your own file 
name for saved games, means 
that it is easy to save different 
positions to which to return if 
anything happens. It is excel- 
lent value and | would recom- 
mend it to anyone who is even 
slightly interested in adven- 
tures. 
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Each month Simon Goodwin 
boosts QL SuperBasic with new 
commands and functions. 


This month he 


adds dynamic 


memory allocation. 


TOOLKIT 


Extra Treat 


We have an extra treat this 
month, in the shape of a small 
program from Austria which 
alters the Psion version 2 QL 
programs so that they display a 
cursor when loaded. The techni- 
que is not so versatile as Task- 
force and it is for you to protect 
memory from Psion before load- 
ing, if need be, but it means you 
can multi-task Quill, Archive, 
Abacus and Easel with a standard 
EXEC command; there is no need 
for any control program, whether 
Basic or machine code, once the 
tasks have been ‘patched’. 

The ‘patch’ program in listing 
one was written by QL World 
reader Peter Postle of Vienna. It 
has been tested on versions 2.0 
and 2.3 of the Psion programs. 
The program uses my SCROLL 
discovery, from the February OL 
World, to wind through the first 
part of the task code, depositing 
new and changed instructions 
which turn on a cursor in the main 
task window. 

The new code becomes an 
integral part of the task and does 


100 REMark FSION PATCH (C) P.FPost], Viena, its 
110 RESTORE : CLS : PRINT "Patch for Psiur v2 software." 
op 


120 INFUT “Enter drive & file 
136 OFEN #3,p% 


not increase the file length. The 
only difference is that you can load 
the task with EXEC, rather than 
EXEC_W,, and swap into or out 
of it with Control C. Shift FS5 
redraws the Psion screen. 

Listing one is simple and easy to 
enter but it performs few checks. 
It is for you to make sure you have 
supplied an appropriate task name 
—Quill, Archive, Abacus or Easel. 
We have not been able to try it on 
version 2.35 but it should work 
unless Psion changed the format 
of the start of the files for that 
version, which is unlikely but 
possible. The patch works with 
Archive and Archder 2.38. 

The patch will not work with 
other task files, compiled Basic 
applications or tasks which have 
been bloated by the QRAM ‘grab- 
ber’. It links into the specific 
pattern of code at the start of the 
Psion packages. If in doubt, save 
any important information before 
EXECing a patched task. It is wise 
to patch a back-up copy of the file 
rather than your master. Ensure 
that the driver you are using is not 
write-protected or the program 
will not work. 


name of Psion c y P's 


146 REPeat mdv_wait : IF PEEK(164078)=0 : EXIT mdv_wait 


156 SCROLL #3,42,42 : REMark Set file pointer 
byteé=CODE CINKEYS (#3,-1)) 


160 by teS=CODE ( INKEYS (#3,-1)) 
170 IF byteé<>216 
18% SCROLL #3,0,42 : REMark 


i90 FOR n=O TO 15 : READ byte : 


206 SCROLL #3,40,42 : REMar} 


Set file pointer to start 
PRINT #3, CHRE (byte) $ 
Fatch call at byte 40 


FOF m-40 TO 43 2: READ byte : PRINT #3,CHRS$ (byte) $ 
OG END tf : REMark Don*t patch more than once! 


220 CLOSE #3 : PRINT p%3" patched. Load with EXEC "3p 


DATA 96,12,43,72,byteS, byted, 118, 255,112 


DATA 14,78, 67,78, 117, 48, 60, 78, 186, 255, 216 


to byte 42 


his column introduces code to 

handle the ‘common heap’ — an 

area of memory shared between 

tasks and the QL operating 
system. Such commands have been inclu- 
ded in toolkits previously but the DIY 
variants have exceptional and convenient 
tricks up their sleeves. You should still be 
aware of the potential pitfalls of the heap 
allocation scheme, which I shall discuss in 
detail later. 

This month’s DIY Toolkit commands 
are called RESERVE, DISCARD and 
LINKUP. RESERVE is a little like 
RESPR, in that is is a function which 
returns the address of an area or reserved 
memory. RESERVE has many advanta- 
ges over RESPR. It works while tasks are 
running, when RESPR reports ‘not com- 
plete’. If there is not sufficient memory 
available it returns a standard error code, 
without stopping the program, so prog- 
rams can report the problem or side-stop it 
automatically. 

You can specify the task which owns the 
memory allocated with RESERVE, so 
that the space is released when the task 
stops, or make it permanent if you want 
reserved memory to be shared between 
several tasks. Unlike the SuperToolkit 
ALCHP, the allocation persists even if 
you load a new SuperBasic program, so 
you can RESERVE memory for fonts in 
standard Basic windows or code or data 
which must remain resident. 

If you allocate memory with RESPR 
there is no way to reclaim it without re- 
setting the QL but the DIY commands are 
not that possessive. DISCARD can 
release any memory allocated with 
RESERVE. Thus you can un-RESPR 
memory when you no longer need it. 
Unlike the Turbo Toolkit DEALLO- 
CATE, DISCARD checks that the mem- 
ory was grabbed with RESERVE in the 
first place and resists the temptation to 
crash the machine if given the incorrect 
address or an address which has already 
been discarded. 

DISCARD is a command which takes a 
single address parameter. The parameter 
must be a value which was returned by 
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RESERVE. Absent, odd, Negative or 
extra parameters cause the standard ‘bad 
parameter’ report, while DISCARD com- 
plains ‘not found’ if the nominated 
address is superficially satisfactory but 
does not correspond to the start of a 
currently-reserved area. 

RESERVE is a function which takes 
two numeric parameters. The first is the 
number of bytes to be reserved, anything 
from | upwards, and the second is the long 
word identifier of the task which will own 
the memory. The most common task 
identifiers are 0, to make space owned by 
the permanent task SuperBasic, and —1, 
so that the space is owned by the ‘current 
task’ and is released automatically when a 
compiled program terminates or is 
removed. 

These are the commands a task would 
use to allocate a buffer of 12K bytes of 
memory and then release it: 


buffer=RESERVE(1024*12, —1) 
IF buffer >=0 : DISCARD buffer 


If all is well, RESERVE returns the 
address of an area of memory. If there is 
insufficient free memory at the time of the 


call it returns the conventional ‘out of 
memory’ code —3. If your chosen owner 


task does not exist the code returned is — 
2. Nonsensical parameters cause the usual 
‘bad parameters’ or ‘error in expression’ 
reports. 

It is useful to be able to trap task and 
memory errors because there is no way to 
be sure of avoiding them on a multi- 
tasking system. A task can check the 
amount of free memory with PEEKs or a 
system call but the information is out of 
date as soon as it has been read. Other 
tasks may stop or grab memory at any 
time, so the only way you can be sure an 
operation is workable is by performing it. 
Test the value returned from RESERVE. 
Do not assume it is positive or your 
programs may sometimes fail myste- 
riously. 

The LINKUP command is a logical 
extension of RESERVE which loads a 
code file into memory at any time, linking 
it permanently into the system. Normally 
extension code, such as Toolkit com- 
mands or new devices like MEM or RAM 
discs, must be loaded into RESPR mem- 
ory before any tasks are running. This 
process involves several steps, including 
finding the code size, allocating memory, 
loading and calling the code. 

SuperToolkit includes an unpronounce- 
able but useful command LRESPR, which 
loads and calls the start of an extension 
code file in one fell swoop. Unfortunately 
it uses RESPR internally, so it will not 
work while tasks are running, which can 
be bad*news if you are in the middle of 
using a task and realise you need a new 
command or device. 

LINKUP works like LRESPR but uses 
permanent ‘command heap’ memory, so it 
can run at any time. The name LALCHP 
might seem more suitable to diehard 
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570 
58a 
S90 
600 
610 
620 
630 
640 
650 
660 
670 
650 
696 
7o0 
714 
726 
730 
740 
750 
760 
770 
786 
770 
Boo 
816 


REMar 


k Simclair OL World HEX LOADER 


END DEFine HEX LOAD 


110 REMark by Marcus Jeffery & Simon N Goodwin 
120 ; 

156 CLS: RESTORE : READ space: star t=RESFPRispace?> 
166 PRINT “Loading Hex..." : HEX_LGAD start 
170 INFUT "Save to file..."3f% 

186 SBYTES f$,start,byte : STOP 

190 : 

200 DEFine FuNction DECIMAL (x) 

210 RETurn CODE (h$ (x) )-48-7* (hS (x) SO") 

226 END DEFine DECIMAL 

pr 8 Ti 

240 DEFine PROCedure HEX_LOADistart) 

290 byte = 0 : checksum = O 

30G REPeat load_hex_digits 

316 READ hs 

320 IF h$="*" > EXIT load _hex_digits 

336 IF LEN(hS) MOD 2 

340 PRINT"Odd number of hex digits in: "jh 
350 STOP 

360 END IF 

370 FOR b = 1 TO LEN(hS) STEF 2 

386 hb = DECIMAL (b>) =: lb = DECIMAL (b+1) 
396 IF hb<O OR hb?>15 OR 1b<0 OR 16715 
406 PRINT"Tllegal hex digit int "“sh% STOF 
420 END IF 

430 FOKE start+byte, 16*#hb+lb 

440 checksum = checksum + 16*#hb + Ib 

45a byte = byte + 1 

460 END FOR b 

47G END REFeat load_hex_digits 

480 READ check 


490 IF check <> checksum 

S00 PRINT"Checksum incorrect. Recheck data.":STOF 
S20 END IF 

530 PRINT"Checksum correct, data entered at: “istart 
560 


REMark Space requirements for the machine code 
DATA 318 


REMark Machine code data 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATS 
DATA 
DATA 


“43FA011634790000", "01104ED234790006" 
"OLI64E92666C5343", "6666204972FF 7601" 
“46447001 4E424A80", "6658225674407 6FF" 
“4E4470474E434A86",, "6630225622731 E800" 
“7OF 108010000662E", "2801284874007018" 
"4E414088066202248", "2404C14C76FF7048" 
“4E 4344806B067002", "4E424ED42E0G204E" 
"7O194E4160G22E00", "70024E 422007 4E75" 
“7GF 14E7534790000", "G1184E9266F 45343" 
"66EE 2231 ES00SRE8", “OBO1000066E2264i" 
“OCA0427546616704", “7OFS4E754298701 9" 
"4E4149E7534790000" ,"61184E9266C45543" 
“66BRE223 1EB006FBR8", "2431E 80454892049" 
“0058701 84E 414880", "S6ROA21 704275464661" 
“FFFC2O0B38002800", “671 C38SC08iFDOBG" 
"691453442A007210",, "2005E3A069049841" 
"2ZAGGE241466F2226E", “OOSB2SBS5EB8G23384" 
"E800780270004E75", "GOO2FEF2064C494E" 
“4BSSSGOGFF 600744", "4953434152440000" 
“OGOLFFB207524553", "455256450060", 


ee 


25431 


QJump fans but I rejected it because the 
memory reserve is allocated permanently, 
unlike ALCHP space, and I find names 
like ‘LRESPR’ and ‘LALCHP’ needlessly 
cryptic. Change it if you like; that is the 
whole idea of DIY Toolit. 

LINKUP takes one string parameter — 


either a string variable, string expression 
or a name in quotes. You must specify the 
full name of the file; for example: 


LINKUP ‘flp1__diy__heap__code’ 
Memory allocated with LINKUP is 


reserved permanently. This is because 
LINKUP is designed for use with exten- 
sions to the system which are accessible to 
any task. When you CALL a file of 
extension commands, the SuperBasic 
Name Table is updated with the addresses 
of code for each command or function. 
Compiled tasks look up the names of 
commands they need and copy the corres- 
ponding addresses so they can call the 
code. 

If you discard memory used for exten- 
sions, the SuperBasic tables still hold 
addresses in the area but other tasks are 
free to use the memory. The machine is 
likely to crash if it tries to call those 


routines once their code has been over- 
written. 

Problems are even more likely if you 
discard the memory used for device 
drivers or interrupt serves. Unless you 
disconnect each link to the system expli- 
citly inside the code it will continue to be 
called when the device is used, or the 
system tries to recognise the parameter of 
OPEN, or an interrupt occurs. 

A few QL extensions can be unlinked, 
with commands like the Speedscreen_ 
SPEED 0, or T__OFF which disconnects 
DIY Toolkit timer interrupts. They are 
exceptional and anyway they still leave 
command code linked, in case you want to 
turn them back on later. So LINKUP does 
not allow DISCARD. If you want to load, 
call and jettison code, use separate steps, 
including RESERVE, or accept the loss of 
memory. 

In some cases you may not mind loading 
a small file with LINKUP. For instance, 
one very easy way to get a graphics 
printout of the majority of the QL screen 
is to put the Easel cartridge in Microdrive 
1 and type: 


LINKUP ‘mdv1__gprint__prt’ 


This loads and calls the Easel screeen 
dump routine but it leaves you with about 
500 fewer bytes to play with once printing 
is complete. 

The code for the heap management 
commands is listed in two forms. Listing 
three gives you a quick way to enter the 
code without using an assembler. It loads 
the equivalent machine code from DATA 
statements and saves the code in a file. 
Once you have loaded that file, as follows, 
you can use RESERVE, DISCARD and 
LINKUp in your own programs: 


base=RESPR(318) LBYTES “file- 
name”, base : CALL base : NEW 


The first part of listing three is Marcus 
Jeffrey’s standard loader, used in every 
month’s DIY Toolkit project. Only the 
DATA, from line 590 onwards, changes 
from month to month. 

Listing two is the corresponding assem- 
bly code program, written and assembled 
using HiSoft DevPac. Type this text into 
your assembler if you want to customise 
the code or merge it with other routines. 
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This month’s code is more straightfor- 
ward than recent DIY Toolkit projects. 
As usual, the START routine calls BP. 
INIT, the ROM vector which adds new 
commands to SuperBasic. The table label- 
led DEFINE indicates the names and 
addresses of the commands. 

This table is at the end of the file to 
make it easy to extend the command 
names if they clash with variables or 
SuperBasic names in your programs. I 
commend this format to all RAM toolkit 
writers. It means that a simple utility can 
be used to re-name commands in any 
toolkit file with the appropriate format. 


Names can be made shorter or longer, 
assuming that the code offsets in the file 
are re-computed and do not exceed 32K. 

The bulk of the listing consists of three 
parts, one for each command. LINKUP is 
the most complex command but only 
because it uses six or seven QL ROM 
routines and takes pains to ensure that it 
does not leave the system ina mess if given 
an inappropriate parameter. 

First the code calls CA.GTSTR to fetch 
a string parameter on to the maths stack, 
addressed by 0(A1, A6.L). Names must 
be in quotes, or you will get an ‘error in 
expression’ report. CA.GTSTR does not 
pick up the identifier of parameters as it 
should when it finds a name with no value. 
I shall explain how to curcumvent that 
limitation another month. 

The next block of code uses the name to 
open a file for input. The maths stack can 
move at any time, so the code uses TRAP 
#4 immediately before the OPEN to warn 
Qdos that it must add A6 to AO when it 
needs to find the name. 

If the file is opened successfully 
LINKUP reads the file header to check 
the file size — see QL World, February, 
1988. The header is 64 bytes long and it is 
barely possible that two tasks may per- 
form a LINKUP at the same time. Rather 
than risk collisions and tie up 64 bytes of 
RAM, LINKUP reads the header into the 
SuperBasic ‘buffer’ area, also used by 
EDIT, INPUT, EDLINE$ and COPY. 
Every SuperBasic task has its own ‘buffer’ 
of at least 128 bytes. 

If the file length is odd or the header 
cannot be read, LINKUP closes the 
channel and returns an error code. This is 
the only check to prevent you trying to 


link code which is not executable. You can 
crash the machine easily if you try to 
LINKUP a Quill document or compiled 
task. LINKUP cannot check this for you, 
as extension code files may contain any 
mixture of code and data. 

Otherwise common heap space is allo- 
cated with MT.ALCHP and FS.LOAD 
reads the code into memory. The file is 
closed and JMP (A4) is enough to call the 
code, using the return address from the 
call to LINKUP. The code takes pains to 
de-allocate memory and close the channel 
if an error occurs, so that resources are not 
tied up. 

RESERVE is simpler than it looks. It 
fetches the two parameters, checks that 
the number of bytes is greater than zero 
and passes the buck for all further check- 
ing to MT.ALCHP, the system call to 
allocate common heap space. 

Common heap memory is allocated in 
16-byte positions. Each entry has a 16- 
byte ‘header’ used to keep track of 
allocations. The system uses the heap to 
hold details of channels, devices and 
individual drives; heap space is also used 
by FILL, RAM discs and toolkit com- 
mands like ALCHP, ALLOCATION and 
RESERVE. 


COMMON feap areas Cannot ve ilOVveU 

once they are allocated, as other parts of 
the system may hold addresses inside 
them. 
Memory is allocated from the bottom of 
the QL memory map, upwards towards 
the movable end of SuperBasic and task 
space. Intermediate space is used for file- 
buffering ‘Slave Blocks’. 

It is easy to ‘fragment’ the heap if you 
are careless. Reserved spaces must be a 
contiguous sequence of bytes, so one 
small block in the incorrect place can 
cause havoc. 

Imagine you have 200K free and allo- 
cated 99K with RESERVE. Now you 
open a channel, start to use FILL, or 
access a drive you have not used pre- 
viously. Qdos grabs another few hun- 
dred bytes. Later you DISCARD the 99K 
but you can no longer allocate more than 
100K because the available common heap 
space is split in half by the small system 
allocation. 

Qdos merges adjacent memory areas 
as they are released, so that problem 
disappears if you always DISCARD mem- 
ory in the opposite order from that in 
which you RESERVE it, so long as 
Qdos does not clog things with its own 
allocations in the meantime. Once the 
heap is fragmented the only way to 
recover is to discard the areas which get in 
the way, which may be difficult or impossi- 
ble, or press Reset. 

Even LINKUP fragments the heap 
slightly, because IO.OPEN uses the heap 
to store channel details; next LINKUP 
loads code into the heap, then IO.CLOSE 
discards the channel details, often leaving 
a small ‘hole’ in common heap memory. 

System entries use all 16 bytes of the 
common heap header but the last four 
bytes are unused if you allocate a block 
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* GL WORLD DIY TOOLKIT -— heap memory routines 
* Version 0.7, Copyright 1989 Simon WN Goodwin. 


* 


initialise lea.l 


- 
*® LINEUP 
= 

linkup 


move.w 
jmp 


"file name 


Mmove.w 
ke 
bie. s 
suba.w 
bie. Ss 


move. 
Moved 
moveqg 
trap 
moved 
trap 
tst.1 
bne.s 


move. 1] 
meveg 
maved 
trap 

movea 
trap 

| ce eee | 
bne.s 


move.l 
move.l 
moved 
bist 

bone. s 
move.1 
mave. 1 
moved 
maved 
trap 

tst.i 

bne.s 


mave.l 
move. 1 
exq.1 
movea 
moved 
trap 
ESst..] 
bai.s 


moved 
trap 
jmp 
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define,al 
$iio.,az 
(a2) 
string” 


$iid,az 
tac 

bad return 
#i,d3 

bad param 


bad return 


{aé),ai 
#64,.d2 
i—-1,5d>5 
a 
#71,d0d0 
#5 
da 
bad close 


faS),ai 
O(ai,ad.i).di 
#-—i15,d0 
#O,d1 

bad cloese 
di,d4 
aG,a4d 
#6,d2 
#249.d0 

#i 

do 
bad _ clase 


aO, ai 

d4,qa2 

a4,ao 

#-1.,d3 
#72.d00 
#3 

aa 


bad_load 


Ail -—> extension detaiis 
Fetch BF.INIT vector 
Add these extensions 


- adds extension code in the heap 


Fetch CA.GTSTR vector 
Fut string at O(AI.AS.L) 
Return if unsuccessful 
Gnly one par ameter? 
Return unless just ane 


AO is name offset 

Channei owner = this task 
OFPEN_IN (‘shared access) 
Parameter is A& relative 
10.GFEN trap key 

Try to apen the file 

Was OFEN OK? 

If not, exit & report error 


Ail is BASIC buffer affset 
There’s room for 44 bytes 
Allow plenty of time 
Buffer is A& relative 
FS.HEADR 

Read the file header 

Was it OK? 

Abort otherwise 


Retrieve buffer offset 

Get file length fram header 
Presume “bad garameter* 
Check lenaeth is even 

Close & complain otherwise 
Save lenath of cade 

Save channel ID 

Owner is permanent task 
MT.ALCHF trap key 

Allocate memory 

Did it work? 

If mot, close file & report 


Set ja@ad address 
Retrieve file length 
Retrieve channel ID 
Allow infinite time 
FS.LOAD trap key 

Load the entire fiie 

Did it load OFF 

T# mot, tidy up & report 


ag UP BSB 
Close the fiie 
CALL the code 
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* 

bad load move. 

move.1 

moveq 

trap 

bra.s 

* 

bad close move.1 

clase _out moveg 
trap 
move.i 
rts 

R 

bad _ param moveaqg 

bad_ return rts 

* 


* DISCARD buffer_address 


* 
discard move.w 
jor 
bne.s 
subaq.w 
bne.s 
move.i 
bmi.s 
btst 
bne.s 
move.l 
cmpi.l 
beq.s 
movea 
rts 
seems _ Ok gt Oe 
maveqg 
trap 


rts 
x 


* address/error code = RESERVE (bytes, owner) 


ca 
reserve mave.w 
isr 
bne.s 
subq.w0 
bne.s 
move. 
bhle.s 
mave.1 
adda.1 
move.) 
moved 
trap 
tst.l 
bmi.s 
move. 
move. 1 


close _ out 


dO,d7 
#2,d0 
#2 

d7,do 


#-15,d0 


$118,a2 

(a2) 

bad return 
#1.,d3 

bad param 
Ofai,ad.1),d1 
bad_param 
#65,di 

bad param 
di,aG 

#* Bufa®*.—tad) 
seems _ ak 
#-7,d0 


$118,az 

fa) 

bad return 
#2,d05 

bad param 
Of(ai,ad.1),di 

bad_param 
4(ai,aé.1),d2 
fsal 

ai, $58(ad) 

#24,d0 

#i 

do 

return _fp 

#° Bufa’®,—4¢a0) 

aG,dG 


Save cause of death 
Find the memory 
MT.RECHP trap key 
De—allocate RAM 
Close file & report 


Save error code 
I0.CLOSE trap key 
Close the file 
Restore error code 


Set BAD PARAMETER report 


— deallocate memory aon the heap 


Fetch CA.GTLIN vector 

Get long integers 

Return if fetch fails 

Is there just 1 parameter? 
Reject otherwise 

Get parameter from RI stack 
Parameter must be += 0 
Parameter must be even 
Complain if it is odd 

Use parameter as a pointer 
Check header for watermark 
Only continue if it matches 
Otherwise report NOT FOUND 


Scrub watermark 
MT.RECHF trap key 
De-allocate RAM 


— reserve heap 


Fetch CA.GTLIN vector 
Get leng integers 

Give up if fetch fails 
Two parameters? 

Give up unless two 

Get number af bytes 

At least 1 byte needed? 
Owner -i = self, © = GDOS 
Tweak stack by (8-4) = 2 
Set RV.RIP for result 
MT. ALCHPF 

Allocate RAM 


Return error cade 
Identify this block 
Return AQ via DO 
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* Make DO.L inta a 6 byte decimal in the space on the RI stack 
return fp move.w do,d4 D4 will be exponent 
mave.i do,d5 DS will be mantissa 
beq.s normalised Zerao is a trivial case 
MoOVe.w #2079,d4 First guess at exponent 
add.1l do,do Already normalised? 
bys.s normalised 
subd. w #1,d4 No. halve exponent weight 
move. 1] do,dsS Double mantissa to match 
movea #16.d1 fey ta 16 yt Sshzte 
+. 
normalise mave.l d3,d0 Take copy of mantissa 
asil.i di,da Shift mantissa di places 
bys.s too far Overflows must shift less 
sub.w di,d4 Correct exponent for shift 
move.1 go,d5 New mantissa is more normal 
too_far asr.w #i.di Halve shift distance 
bne.s normalise Try shitt ‘of, Sy.4,\2.'and 


normalised move. ] $55 (a6) .ai Get safe Ai vaiue 
mave.1 d5,2tal,a6é.1) Stack mantissa 
maove.w d4,0(ai,aé.1) Stack exponent 
maved #2,d4 Floating point result 
job dane moveg #0, a0 
rts 


dc.w 2 Two procedures 
dc.w linkup-* 


Gne functian 


“RESERVE” 


with MT.ALCHP. To help DISCARD 
identify RESERVEd memory, the DIY 
Toolkit code stores the text “‘Bufa’ at the 
end of the common heap header, as a kind 
of ‘watermark’. 

The last part of the code is the familiar 
normalisation routine which converts the 
reserved address into a Qdos floating 
point value. It is a pity you cannot return 
long integers by RTS with D4 set to 4. 

DISCARD is very simple. It checks that 
the parameters even and positive, then 
looks for the watermark at the specified 
address. If successful, DISCARD ass- 
umes the space was allocated by 
RESERVE, as there are no words starting 
‘Bufa’ in my dictionary. If clears the 
watermark, then calls MT.RECHP to de- 
allocate the space. It might be considered 
more elegant to link spaces in a list, as 
MEM and ALCHP do, but I use a 
watermark as it is simpler and more 
efficient. 


@ Please write to me, care of QL World, if 
you have found interesting tweaks or short 
applications for DIY Toolkit code. Send 
yur suggestions if you would like me to 
explore a specific area in this column, or to 
implement new and original commands. 


Sinclair/QL World October 1989 39 


If you have a program worthy of consideration, send it to ‘The Progs’, 
Sinclair QL World, Greencoat House, Francis Street, London SW1P 1DG. 


We pay for everything published at the usual page rates. 


Program of the month 


3D SKETCHPAD by A. McGregor 


D Sketchpad, which 

runs on an unex- 

panded QL, enables 

the user to create sim- 
ple wire-frame models in 3D by 
manipulating rectangular 
blocks of different sizes and 
orientations in imaginary 3D 
space. When the program is 
running, the following options 
are available: 


Add Block 


When “ADD BLOCK” is 
selected from the main menu, 
a new block is added to the 
file and default values for the 
parameters which control its 
size, position and orientation 
are displayed on the screen. 
Inputting new values for 
“X__DIMN”, “Ye DIMN™ 
and “Z_~DIMN” will alter 
the size of the block in its 
x, y and z axes. “X_TRAN”, 
“Y_TRAN” and “Z_TRAN” 
define the position of the block 
relative to the point of intersec- 
tion of the three red cross hairs 
X=0, Y=0 and Z=0. The 
block may be rotated in any of 
the three axes by adjusting 
“XK ROTN’ yy ROIN’ or 
“Z_ROTN”. The angle of 
rotation is expressed in 
degrees. Pressing the space bar 
will cause the new block to be 
displayed on the screen and 
return you to the main menu. 
All the block definitions are 
stored in a single two dimentio- 
nal array and up to 100 of them 
may be stored numbered from 
Oto 99. 
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“EDIT BLOCK” enables 
you to return to a block which 
has already been defined so 
that you may make alterations 
to its various attributes. The 
block being edited will be re- 
drawn on top of its old version 
when the space bar is pressed. 

A block may be removed 
from the file by selecting 
“DELETE BLOCK” and then 
following the on _— screen 
prompts. Once a block has 
been deleted it cannot be res- 
tored and other blocks may be 
renumbered as the file is com- 
pressed to fill the gap. Note 
also that the display will not be 
amended during this operation 
and, therefore, the deleted 
block will remain visible until a 
subsequent operation causes 
the entire scene to be redrawn. 


Redraw 


This option simply redraws 
the entire scene. It may be used 
to tidy the screen after a block 
has been edited or deleted. 

At any time during the 
development of a model, the 
position and orientation of the 
“camera” may be adjusted to 
give a different view of the 
scene. Selecting the ‘ADJUST 
VIEW’ option from the main 
menu allows you to input new 
coordinates for both the posi- 
tion of the camera and the 
position of the “target point” 
towards which the camera 
always points. The orientations 
of the X, Y and Z axes as seen 
by the camera are shown 


diagramatically at the bottom 
right of the screen. The size of 
the “lens angle” can also be 
adjusted within the range 20 to 
100 degrees. There are no 
restrictions on where you may 
position the camera within the 
scene since all lines which 
extend beyond the limits of the 
“viewing pyramid” are auto- 
matically ‘clipped’ before the 
perspective transformation is 
carried out. 


Move Origin 


It is sometimes easier to 
work out coordinates for a new 
block if the “origin” — the point 
where X=0, Y=0 and Z=0 
is relocated with respect to the 
existing blocks. The three red 
cross hairs which are normally 

100 REMark KEKE KEKE EEE 
110 REMart 
120 =: 


130 CLEAR:initialise 


140 OPEN#4,con_5S12x256a0x0 
150 OPEN#4,con_448x 200a32> 


3D SKETCHFAD 


Ly 


KHER EEE REE A 


visible on the screen are 
intended to show the position 
of the origin which is at the 
point where they intersect. A 
redraw will be carried out auto- 
matically after this operation. 
All of the block definitions 
and the viewpoint data can be 
saved onto a microdrive car- 
tridge by selecting “SAVE 
FILE” and then following the 
on screen prompts. If a micro- 
drive error occurs the program 
may be restarted without loss 
of data by typing RUN 140. 
Once saved, a file may be 
reloaded into memory via the 
“LOAD FILE” option. 
ABANDON FILE. simply 
destroys the current data and 
restores the viewpoint vari- 
ables to their starting values. 


KEKE HH EEE 


.D.McGREGOR ee HHH HEHE 
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160 BORDER#4,2,2: SCALE#4 ,hght*2,-wdth, -hght 


170 OPEN#S,con 
IF nl 
REPeat menu 
CLS#5: INK#5,4 


378x 40aS2x 


216:CSIZE#5,9,0 
-isdraw_scene:ELSE draw_axes 


LOAD FILE” 


340 


AT#5,0,0 :PRINT#5,"1/ 
AT#S,O, 21: PRINT#S, "2/ 
AT#5,0,42:PRINT#S, "3/ 
AT#5,1,0 :PRINT#S, "4/ 


AT#S,1,42:PRINT#S, "6/ 
AT#5,2,0 :PRINT#S,"7/ 


SAVE FILE" 
ABANDON FILE" 
ADD BLOCK" 
AT#5,1,21:PRINT#S, "S/ EDIT BLOCK" 
DELETE BLOCK” 
MOVE ORIGIN" 


AT#S, 2,21: PRINT#S, "8/ ADJUST VIEW" 


AT#S,2,42:PRINT#S, "9/ REDRAW" 


INK#5 ,7 
AT#5,3,0 


:PRINT#5,"1-9 TO SELECT" 
REFeat chloop 
wait_no_key: key=CODE ( INKEY#(-1))-48 
SELect ON key 
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=1:recall_file EXIT chloop PRINT#S, "PRESS ANY KEY" 

=2:store_file :EXIT chloop wait _no_key:PAUSE:RETurn 

=3: abandon_file :EXIT chloop 230 END IF 

=4:add_object :EXIT chloop : IF ni13+0 

=S:edit_object :EXIT chloop Z PRINT#S, "WHICH BLOCK DO YOU WANT TO EDIT? O T 
=6:delete_object sEXIT chloop 

=7:move_origin :EXIT chloop 260 REPeat chloop2 1 / 

=8:adjust_viewpoint:EXIT chloop 270 ob%=number (5,2,0,3/y"TYPE BLOCK NUMBER >") 
=9:draw_scene :EXIT chloop 280 IF ob%<=ni AND ob%>=O0:EXIT chloope 

END SELect 290 END REFeat chloop2 

END REFeat chloop 300 END IF 

END REPeat menu 3 edblock ob% 

: END DEFine 

DEFine PROCedure initialise 330 8 
wdth=16é6:hght=100:cd=.1 340 DEFine PROCedure edblock (nu%> 

DIM b1k(100,8) ,vw(6) 350 LOCal key 

vw (0) =O: vw(1) =O: vw(2) =O INK#5,4:CLS#5 

vw (3) =150: vw (4) =—-400: vw (5) =3001 vw (6) =60 PRINT#5S,"1/ X DIMN="&b1lk(nuZ,0O) sAT#HS,0, 21 
ni=-i:set_up_view PRINT#S,"2 DIMN="&blk (nu%, 1) sAT#5S,0,42 


v 
END DEFine PRINT#5,"3/ Z DIMN="&blk (mu%,2) sAT#HS,1,0 
: PRINT#S,"4/ X TRAN="&blk (mu%,3) sAT#S,1,21 
DEFine PROCedure abandon_file PRINT#S,"S/ Y TRAN="&b1lk (nu%,4) sAT#S,1,42 
INK#5,4:CLS#5 PRINTHS,"6/ Z TRAN="&b1lk (nu%, 5) sAT#S,2,9 
IF ni=-1 PRINT#5,"7/ X ROTN="&b1lk (mu%,6) sAT#S,2,21 
PRINT#5,"FILE ALREADY EMPTY!" PRINT#HS,"8/ Y ROTN="Sblk (nu%,7) :AT#S,2,42 
PRINT#5S,"PRESS ANY KEY" PRINT#HS,"9/ Z ROTN="b1k (nuZ%,8) sAT#S,3,0 
wait_no_key: PAUSE INK#5 , 7 
ELSE PRINT#5,"1-9 TO EDIT OR SPACE TO EXIT" 
PRINT#5, "CURRENT DATA WILL BE LOST IF NOT ALRE OD REPeat chloopS 
SAVED!" wait_no_key: key=CODE (INKEY#(~—1))-48 
PRINT#5,"DO YOU WANT TO CONTINUE? Y/N" 500 SELect ON key 
IF NOT yes:RETurn =1:b1k (nu%,0) =number (5,0,10,8,0,"") 
END IF =2:blk (nu%, 1) =number (5,0,31,8,0,"") 
initialise:CLS#4:draw_axes 30 =3:blk (nu%, 2) =number (5,0,52,8,0,"") 
END DEFine =4:b1k (nu%, 3) =number (5,1,10,8,1,"") 
: 1550 =S:blk (nu%,4) =number (5,1,31,8,1, 
DEFine PROCedure delete_object 1560 =6:b1k (nuZ%,5) =number (5,1,52,8,1, 
LOCal n,m,ob% 1570 =7:blk (nu%,6) =number (5,2,10,8,1, 
INK#5, 4: CLS#5: ob%=0 1580 =8:blk (nu%,7)=number (5,2,31,8,1, 
IF ni=-1 1590 =9:b1k (nu%,8) =number (5,2,52,8,1, 
PRINT#5,"NO BLOCKS PRESENT!” 1600 =32-48 
PRINT#5,"PRESS ANY KEY" 1610 flag%=0: ob jt=nuZ%: draw_ob ject 
wait_no_key:PAUSE:RETurn 1620 IF flagz=0 
ELSE 1630 INK#5,4:CLS#5 
IF n1>0 1640 PRINT#5,"BLOCK OUTSIDE VIEWING PYRAMID!" 
PRINT#5,"WHICH BLOCK DO YOU WANT TO DELETE? 0 1650 PRINT#5,"PRESS ANY KEY" 
tn 1660 wait_no_key:PAUSE 
REFeat roloop 1670 END IF 
ob%=number (5,2,0,3,"TYPE BLOCK NUMBER >") 1680 RETurn 
IF ob%<=n1 AND ob%>=OrEXIT roloop 1690 END SELect 
END REPeat roloop 1700 END REPeat chloop3 
END IF 1710 END DEFine 
CLS#5 1720 3: 
PRINT#5, "DELETE BLOCK NUMBER" !ob%! "Y/N" 1730 DEFine FuNction yes 
IF yes 1740 LOCal key? 
FOR n=0b% TO ni 1750 wait_no_key 
FOR m=0 TO DIMN(b1k,2) 1760 REPeat ynloop 
blk (n,m) =blk (n+1,m) 1770 keyS=INKEY#(-1) 
END FOR m 1780 IF key#=="y":RETurn 1 
END FOR n 1790 IF key#=="n":RETurn O 
ni=ni-1 1800 END REPeat ynloop 
CLS#5 1810 END DEFine 
PRINT#5, "BLOCK NUMBER"! o0b%! "DELETED" 1820 : 
PRINT#5,"PRESS ANY KEY" 1830 DEFine PROCedure wait_no_key 
wait_no_key:PAUSE 1840 LOCal key%,n 
END IF 1850 REFeat wloop 
END IF 1860 key%=0 
1000 END DEFine 1870 FOR n=0 TO 7:key%=key%+KEYROW(n) :END FOR n 
1010 : 1880 IF key%Z=O:EXIT wloop 
1020 DEFine PROCedure add_object 1890 END REPeat wloop 
1030 LOCal key%,objt 1900 END DEFine 
1040 IF ni<DIMN(blk)-1 1910 : 
1050 ni=ni+1 1920 DEFine PROCedure adjust_viewpoint 
1060 blk (n1,0)=100:b1k (n1,1)=100:b1k (n1,2)=100 1930 LOCal key 
1070 edblock nil 1940 INK#5,4:CLS#5 
1080 ELSE 1950 PRINT#5,"1/ TGET X="&vw(0) sAT#5,0,21 
1090 INK#5,4:CLS#5 1960 PRINT#5,"2/ TGET Y="&vw(1):AT#5,0,42 
1100 PRINT#5,"FILE FULL!" 1970 PRINT#5,"3/ TGET Z="&vw(2):AT#5,1,0 
1110 PRINT#5,"PRESS ANY KEY" 1980 PRINT#5,"4/ CMRA X="&vw(3) sAT#5,1,21 
1120 wait_no_key: PAUSE 1990 PRINT#5,"5/ CMRA Y="&vw(4) :AT#5,1,42 
1130 END IF ZOGO-PRINTHS, "6/ CMRA Z="Svw(S) sAT#HS,2,0 
1140 END DEFine 2010 PRINT#5,"7/ LENS A="&vw(6) :AT#5,5,0 
1150 : 2020 INK#5,7 
1160 DEFine PROCedure edit_object 2030 FPRINT#5,"1-7 TO EDIT OR SPACE TO EXIT" 
1170 LOCal ob% 2040 REPeat svloop 
1180 INK#5,4:CLS#5: 0b%=0 2050 wait_no_key: key=CODE (INKEY$(—1))-48 
1190 IF ni<o 2060 SELect ON key 
1200 PRINT#5,"NO BLOCKS PRESENT!" 2070 =1:vw(0)=number (5,0,10,8,1,"") 
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=2:vw(1)=number (5,0,31,8,1, 
=3: vw(2) =number (5,0,52,8,1, 
=4: vw(3) =number (5,1,10,8,1,"") 

=5: vw (4) =number (5,1,31,8,1,"") 

=6: vw (5) =number (5,1,52,8,1,"") 
=7:vw(6) =number (5,2,10,3,0,"") 
Iftk#S,4:AT#5,2,10 

IF vw(6)<20 

vw(6)=20 :PRINT#5,"20 bs 

END IF 

IF vw(6) >100 
vw(6)=100:PRINT#5,"100 " 

END IF 

=32-48 

IF ni>=Or:draw_scene:ELSE draw_axes 
RETurn 

END SELect 

END REPeat svloop 

END DEFine 


wny 


DEFine PROCedure move_origin 
LOCal x,y,zZ,n 

INK#5,4:CLS#5 

IF ni=-1 

PRINT#5S, "FILE EMPTY!" 
PRINT#5, "PRESS ANY KEY" 
wait_no_key:PAUSE:RETurn 

END IF 

REPeat orloop 

CLS#5 

x=number (5,0,0,8,1,"X DISPLACEMENT.....---- > 


y=number (5,1,0,8,1,"V DISPLACEMENT......----> 
z=number (5,2,0,8,1,"Z DISPLACEMENT......--- > 


AT#S,0,36 

PRINT#S, "ALL CORRECT? Y/N" 
IF yes:EXIT orloop 

END REPeat orloop 

vw (0) =vw (0) -x 
vwil)=vwil)-y 
vw(2)=vwl2)—-z 

vw (3) =vw (3) -x 


vw (4) =vw (4) -y 


vw (5) =vwS) -z 

FOR n=0 TO nil 

blk (n,3)=blk (n,3)-x 

blk (n,4) =blk (n,4)—y 

blk (n,5)=blk (n,5)-z 

END FOR n 

draw_scene 

END DEFine 

DEFine FROCedure set_up_view 

LOCal exr,eyr,ezr,di,d2 

exr=vw(3)-vw(0) 

eyr=vw(4)—-vwil) 

ezr=vw(S) -vw(2) 

d1i=SORT (ABS (exr 2) +ABS (eyr 2) ) 
2=SORT (ABS( d1i“2)+ABS (ezr“2)) 
IF exr=0 AND eyr=0 AND ezr=0 

al=1:a2=0: a3=1:a4=0 

ELSE 

IF exr=0 AND eyr=0 

al=1:a2=0: a3S=0: a4=ezr/d2 

ELSE 
al=eyr/-d1:a2=exr/d1:a3=d1/d2: a4=ezr/d2 

END IF 

END IF 

Va=al: vb=a2: vg=as: vk=-a4: vl=d2 

ve=a4*e—a2: vf=a4eals vi=aS*—-a2: vVj=aseal 

sd=wdth/TAN (RAD (vw (6) /2) ) 

END DEFine 

DEFine PROCedure draw_scene 

LOCal objt 

INK#5, 4: CLS#5: draw_axes 

IF n1<o 

PRINT#5,"NOTHING TO DRAW!" 

PRINT#5,"PRESS ANY KEY” 

wait_no_key:PAUSE:RETurn 

END IF 

FOR objt=0 TO ni 

draw_object 

END FOR objt 

IF flagZz=0 

CLS#5 
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PRINT#5, "VIEWING PYRAMID EMPTY!" 
PRINT#5, "PRESS ANY KEY" 
wait_no_key: PAUSE 

END IF 

END DEFine 

DEFine PROCedure draw_object 

INK#4, 7: INK#5, 4: CLS#5:AT#5,0,0 
PRINT#5, "DRAWING BLOCK NUMBER"! ob jt 
syz=SIN(RAD (blk (objt,6))) 

cyz=COS (RAD (blk (objt,6))) 
sxz=SIN(RAD(b1lk(objt,7))) 
cxz=COS (RAD (b1k (objt,7))) 
sxy=SIN(RAD (blk (objt,8))) 

cxy=COS (RAD (b1k (objt,8))) 

tdx=blk (objt,3) -vwi(O) 

tdy=blk (objt,4)-vw(1) 

tdz=blk (objt,5)-vw(2) 

y=blk (ob jt ,0) /22y=blk (ob jt,1)/2:z=blk (objt,2) 


RESTORE 4640 

DIM xe(8) ,ye(8) ,ze(s) 
FOR vtx=1 TO 8 

READ xW,YW,ZW 
rotate_x yw,zw 
rotate_y zw 
rotate_z 
translate kw,yw,zwW 
viewpoint xw,yw,zw 

END FOR vtx 

FOR cnct=1 TO 12. 

READ vertexi,vertex2 
draw_line vertexi,vertex2 
END FOR cnct 

END DEFine 


XW, 
xW,ywW 


r] 

DEFine PROCedure rotate xty;2? 
LOCal yt,2t 

yt=cyz#y-syz*z 

zt=syz*y+cyz*¥z 

yweyt:zwezt 

END DEFine 


8 

DEFine PROCedure rotate_y(x,z) 
LOCal xt,zt 

XC=SKXZHZ+CKZEX 

Zt=cxnz¥z—-SKXzZ*X 

xw=xtizw=zt 

END DEFine 


8 

DEFine PROCedure rotate_z (x,y) 
LOCal xt,yt 

xt=cxy#x-sxyty 

yt=sxy*xtcxy*ty 

xw=xtsyweyt 

END DEFine 


8 

DEFine PROCedure translate(x,y,z) 
xwex+tdxs ywHy+tdy: zw=z+tdz 

END DEFine 

DEFine PROCedure viewpoint (x,y,z) 
xe (vtx) =va¥extvb¥y 

ye (vtx) =verx+vt tytvgez 

ze(vtx) =viext+vj*tytvkeztvl 

END DEFine 

8 

DEFine PROCedure draw_axes 
LOCal wx ,wy,Vv1,Vv2,px py, ps,dis 
CLS#4:CLS#5: INK#4,2:set_up_view 
DIM xe(6) ,ye(6) ,ze(d) 

wx=70s wy=40 

OPEN#3, scr 

WINDOW#S , wx ,wy ,480-wx , 216: CLS#S 
SCALE#S ,wy ,-wx/1.35/2,-wy/2 
PAPER#S , 0: INK#3,2 

OVER#3, 1:CSIZE#3,0,0 
CLS#3:dis=wy/2-5 

RESTORE 4570 

FOR vtx=1 TO 6 

READ XW, YW,Zzw 

viewpoint xW.yw,zw 

END FOR vtx 

FOR cnct=1 TO S 

READ vi,v2 
LINE#3,xe(v1),ye(vl1)TO xe(v2) ,yelv2) 
END FOR cnct 

FOR p=2 TO 6 STEP 2 
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Throw Away That Filofax! 


Agenda is the latest hand-held data management system, a word processor, a filing 
system, a diary and calculator literally at your finger tips. 


The AgendA has an 80 character LCD display, a fully alpha-numeric key pad with 21 
functions keys, plus a Microwriter keyboard. The Microwriter consists of seven ke’ = and 
can emulate a 100+ keyboard. It is so easy to learn you can be touch-typing wnin a 
couple of hours. The extensive documentation includes a Microwriting Tutorial a-. ‘vell 
as covering all of the software features. 


Naturally we have included a charging unit for AgendA‘s rechargeable batteries. 
Optional power supplies include a 9v battery adaptor and 110v charger for use overseas. 


Plus, for the international traveller, there are two translator cards available in French and 
German. Each card contains a 2,000 word and phrase vocabulary. 
Get the completely organised organiser! Order Code AGENDA £195.00. 
Optional Extras: 
32K External storage cards £35.00. Order Code AGENDASTOR. 
PC connector cable £25.00. Order Code AGENDACABLE. 
Communications software £15.00. Order Code AGENDACOMM. 
Parallel Centronics printer lead £25. Order Code AGENDAPARAL. 
RS232 Serial Lead £35. Order Code AGENDARS232. 
English/French Translator Card £35. Order Code AGENDAADD1. 
English/German Translator Card £35. Order Code AGENDAADD2. 


Priority Order Form 


Name: Mr/Mrs/Miss _ Initials............... SSUPTNEYNE we cscass etna sp vorgse Tun cecasssvasescepncdensceaseas tases tek ap cenceuwcet dasbaavancuotehce teens cck 
COMPSNY MAMIGAWHETOS GHONCHING) 50insuieseis<ovaasulstadadotebenceansb casde acto ccsach obs. cie eon ccateiccueunteticon sen eneie edhe an oeteae mrameebes Mean 
PROM CAL Ese eairsttcarctpa ies Ryntseee cae caleaias tba Neovo en ca seu on ain eeudha oatictoniaotid: Vovtnniuses doenceislan nor tietusnet enteoenttanrieee: petereoeetta rem ittoniterteeen aCe 


VVVVVVY 


Please send Cheque/Eurocheque/Postal Order made payable to: Lazahold Ltd 
Access/Mastercard/Eurocard/Barclaycard/Visa JOOD/OOOLDOODOODOO00 Expiry Date: 7_ + — 


SSIES III IGED CIMCETCEMEMEIET ce pversesocnacpenentinés «cence sigtechcobesti chspuyegey esas eavepuceuaacacereccentsercitt exetacsenswcsesdeit cave sdasskast tevemcaias Gtr) 


Description 


Send to: Lazahold Ltd, PO Box 10, PRE Complex, Pallion Industrial Estate, Sunderland, SR4 6SN. 
Offer closes: 31st December 1989 

Prices include VAT ana delivery within the U.K. mainland. (Overseas despatch on application). 

Please allow up to 28 days for delivery. A2 


@& ORDER HOTLINE 091 510 8787 (23 Lines) 
Faxline 091 510 0155. EMAIL/Telecom Gold MAG 90320(72) 
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px=wx /2-3+xe (p) #1.35 
py=wy/2-S-ye (p) 
CURSOR#S ,px ,py 

READ p# 
INK#3, 4: OVER#3,—-1 
PRINT#3,p+ 

END FOR p 

dis=1E6 

RESTORE 4570 

FOR vtx=1 TO 6 

READ xw,yw,2w 
xW=xw-vw (0) syw=ywovw (1) szwe=zw-vw (2) 
viewpoint xw,yw,zw 
END FOR vtx 

FOR cnct=1 TO S 

READ vi,v2 
draw_line vl,v2 

END FOR cnet 

flagz=0 

END DEFine 


DEFine PROCedure draw_line(vtx1,vtx2) 
LOCal cxi,cy1,cx2,cy2,vel,ve2,vcS 
LOCal cf1%,cf2%,xs1,ys1,xs2,ys2 
xl=xe(vtxl) sx2=xe(vtx2) 
yi=ye(vtxl):sy2=ye(vtx2) 
zi=ze(vtxl):z22=ze(vtx2) 

IF zi<ecd AND z2<cd:RETurn 

tf zi<cd:clip_zsxl=xcsyl=yc:z1=cd 

IF z2<cd:clip_z:x2=xcsy2=ycsz2=cd 
cxl=sd/wdth*x1l:cx2=sd/wdth*x2 
cf1%=(cxi<—z1)+(ex1>z1) #2 

cf 2%= (cx 2-22) + (cx2>z2) #2 

IF cf1%>0 AND cf1%=cf2Z%:RETurn 

IF cf1%>0 

clip_xy cf1%,x1l,y1,21,*x2,y2,22,sd,wdth 
xL=velsyl=ve2:z1=vc3 

END IF 

IF cf2%>0 

clip_xy cf2%,x1,y1,z1,*%2,y2,22,sd,wdth 
x2=vel:y2=vce2:22=vc3 

END IF 

cyil=sd/hght*yl:cy2=sd/hght#y2 
cf1%=(cyi<—-z1)+(cyi>zi)*2 

cf 2%=(cy2<-z2) +(cy2>z2) *2 

IF cf1%>0 AND cf1%=cf2%:RETurn 

IF cf1%>0 

clip_xy cfi%,y1,x1,21,y2,x2,22,sd,hght 
yil=vel:x1l=vc2:z1=vc3 

END IF 

IF cf2%30 

clip_xy. cf2%,y1,x1,21,y2,x2,22,5d,hght 
y2=vel:x2=ve2:z22=vc3 

END IF 

xsl=sd*x1/zilsysli=sd*yl/zi 
xS2=sd*x2/z22: ys2=sd*¥y2/z2 
LINE#4,xsi,ysl TO xs2,ys2:flagZ=1 

END DEFine 

8 

DEFine PROCedure clip_xy(cf%,v1,V2,V3,V4,V55Vv 
vB) 

LOCal mu,dc1,dc2,d1,d2,d3,d4 
di=v4*v7:d2=v1-v4:d3=v2-v5: d4=v3-v6é 

IF cf#%=12mu=(di+ve*"ve) / (d2*-v7-d4*v8) 
IF cf%=2:mu=(di-vé*vB) / (d2*-v7+d4*vB) 
vel=mu*vit (1—-mu) v4 

veSs=mu*vS+ (1—-mu) *v6 

dc1=SOQRT (d2°2+d4°2) 

dc2=SQRT ( (vc i-v4) “2+ (vce3-v6) “2) 
ve2=dc2*d3/dcl+vS 

END DEFine 


DEFine PROCedure clip_z 
we=(cd—-z21) *(x2—x1)/(z2-z1) +x1 
ye=(cd-z1)*(y2-y1)/(z2-z1)+y1 
END DEFine 


REMark AXES 

DATA -dis,0,0,dis,0,0 
DATA 0,-dis,0,0,dis,0O. 
DATA 0,0,-dis,0,0,dis 
DATA. 1, 245745556 

DATA *X, "ve uz? 


REMark BOX 

DATA —X 9—¥9~Z 9 TX 5 Va7Z 9X9 V 9-2 Kha V9 2 
DATA —% y-¥sZ 97% a Vo a%sVaea%a-Voe 
DATA 1,2,4,3,8,7,5,6 
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DEFine PROCedure store _file 
LOCal filet,i,ij 
INK#5,4:CLS#5 

IF mi=-1 
PRINT#5,"FILE EMPTY!" 
PRINT#S, "PRESS ANY KEY" 
wait_no_key: PAUSE: RETurn 
END IF 

CLS#5 

PRINT#5,"TYPE DEVICE (e.g: MDV1_) & FILE NAME 
filet=file_name#(5,2,0) 

CLS#5 

PRINT#5S,"SAVE "&files&"? Y/N" 

IF NOT yes:RETurn 

OPEN_NEW#H10, filet 

PRINT#10,"THIS IS A 3D SKETCHFAD FILE" 
FOR i=0 TO DIMN(vw) 

PRINT#10,vw(i) 

END FOR i 

FOR i=O TO ml 

FOR j=0 TO DIMN(bIk,2 

PRINT#10,b1k(i, Jj) 

END FOR j 

END FOR i 

CLOSE#10 

END DEFine 

DEFine PROCedure recall_file 

LOCal filet,id%,i 

INK#5,4:CLS#5 

If ni>-1i 

PRINT#5,"CURRENT DATA WILL BE LOST IF NOT ALR 
SAVED!" 

PRINT#5,"DO YOU WANT TO CONTINUE? Y/N" 
IF NOT yes:RETurn 
END IF 

CLS#5 
PRINT#5,"TYPE DEVICE (e.g: MDV1_) & FILE NAME 
filet=file_namet(5,2,0) 

CLS#5 

PRINT#5,"LOAD "&files&"? Y/N" 

IF NOT yes:RETurn 

OPEN_IN#10,file* 

INPUT#10,id# 

IF id#="THIS IS A 3D SKETCHPAD FILE" 
initialise:ni=-1 

FOR i=0 TO DIMN(vw) 

INPUT#10, vw (i) 

END FOR i 

REPeat ldloop 

IF EOF (#10):EXIT ldloop 

ni=ni+l 

FOR i=0 TO DIMN(blk,2) 
INFUT#10,b1k(n1,i) 

END FOR i 

END REPeat ldloop 

draw_scene 

ELSE 

CLS#5 

PRINT#5, "WRONG FILE TYPE!" 
PRINT#5,"PRESS ANY KEY" 
wait_no_key:PAUSE 

draw_scene 

END IF 

CLOSE#10 

END DEFine 

DEFine FuNction file_name#(ch%,yp%,xp%) 
LOCal k,b#,xpc% 
bs="_3D":xpcZ%=O0:wait_no_key 

REPeat floop 

AT#ChHz, yp%,xp% 

PRINT#ch%, bS&FILL#(" ",42-LEN(b#)) 
INK#ch%, 7: PAPER#ch%, 2: OVER#ChZ,0 
AT#ch%, yp%,xp%+xpc%:PRINT#HCHZ," " 

IF LEN(b#) >xpc% 
OVER#Ch~, 1: AT#ChH%, yp%,xp%Z+xpc% 
PRINT#ch%,b#(xpcZ%+1) 

END IF 

INK#ch%, 4: PAPER#chz, 0: OVER#ChHZ,0 

k=CODE (INKEY$(-1)) 

SELect ON k 

=192:IF xpcZ%Z>O:xpc%=xpcz-1 
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5810 
S820 
S830 
5840 

S850 
5860 
5870 
5880 
5890 

5900 
S910 

5920 
5930 
5940 
S950 

5960 


=200: IF LEN(b%)-S3>xpc%:xpc%z=xpc%+l 
=65T0 90,97 TO 122,48 TO 57,95 

IF LEN(b#)<41 

IF LEN(b#)=xpc% 

bS=bs&CHRE(k) 

ELSE 

b#=b$(1 TO xpc%) &CHR#(k) &bs(xpcz%~+1 TO) 
END IF :xpc%=xpc%+1 

END IF 

=194 

IF xpc%>0 

IF LEN(b#)=xpc% 

bS=b$(1 TO xpc%-1) 

ELSE 

b#=b$(1 TO xpc%-1)&bs(xpcz%z+1 TO) 
END IF :xpc%=xpc%- 

END IF 

=10,208,216:1F bS<>"_3D":RETurn bt 
END SELect 

END REFeat floop 

END DEFine 


DEFine FuNction number (ch%,yp%,xp%,1m%,ng%,la 


LOCal key,n#,n,s%,xpc%,lmcr% 

SZ=LEN (lab#) snt=""sxpcZ=Os AT#HCHZ, yp%~,xp% 
lmc%=1m%+3 

PRINT#chz, lab#:wait_no_key 

REPeat nloop 

AT#HCHZA, yP%,xpZ+sZ% 
PRINT#ch% , n#&FILLs(" ",lmcZ-LEN(n#) ) 
INK#ch%, 7: PAPER#ch?z, 2: OVER#ChHZ,0 
AT#CHZ, yp~,xpZt+xpc%Z+szsPRINT#ChHz," " 
IF LEN(n#) >xpcox% 
OVER#ch%, 1: AT#ChHZ, yp%,xpZt+xpc%+s% 
PRINT#ch~% ,n# (xpc%+1) 

END IF 

INK#ch%, 4: PAPER#chz, 0: OVER#chz,0 
key=CODE (INKEY#(-1)) 

SELect ON key 

=192:I1F xpc%>O:xpc%=xpc%- 

=200: IF LEN(n#) >xpc%:xpc%=xpc%+1 
=48TO 57 

IF LEN(n#)<1m% 

IF LEN(n#)=xpc% 

n#=nS&CHRF (key) 


THOoORXVI Version 4 


Version 4 of THOR XVI is a completely redesigned hardware and 


ELSE 


n$=n$(1 TO xpc%) &CHRE (key) &NF(xpcz%z+1 TO) 


END IF sxpc%=xpc%+1 
END IF 
=10,208,216 


IF n$<> "" AND n$<>"-" AND n$<>" 


n=n$: AT#HChHY, yp%,xp%+s% 
PRINT#ch~%,FILL$(" ",1m%+1) 


AT#CHZ, yp%,xp%+s%:PRINT#H#ChZ,n:RETurn n 


END IF 

=194 

IF xpc%>o 

IF n#(xpc%)="." OR n¥(xpcr%)="—- 
IF LEN(n$)=xpc% 

n$=n$(1TO xpc%-1) 

ELSE 


"s1mZ= 


n$=n$(1 TO xpc%-1)&nF(xpc%+1 TO) 


END IF 
xpc%Z=xpc%-1 
END IF 
=46 
IF "-—"INSTR(n#)=1 AND xpc%=0 
ELSE 
IF "."INSTR(n#) =0 
IF LEN(n#)=xpcz 
n$=ns&"." 
ELSE 
ng=n$(1 TO xpcoZ)&". "&ns(xpc%t+i 
END IF 
xPCZ=xpc%~+1:1mZ=1m%+1 
END IF 
END IF 
=45 
IF ngwZ= 
IF xpcZ%Z=0 AND "-"INSTR (ns) =0 
IF LEN(n#)=xpcz% 
ns="— 
ELSE 
nF="—"&nNF(xpcw%Z+1 TO) 
END IF 
xpc“Z=xpc%~+1:1mZ=1m%+1 
LF 
IF 
SELect 
REPeat -nloop 
DEFine 


TO) 


software version of the well-known CST THOR XVI, now a 100% Danish 
production. It is produced by one of the largest Scandinavian manufacturers 
of high quality measuring instruments vouching for the high standard of our 
product. 

The brand new version of ARGOS (6.40/1.07) introduces a number of 
new facilities and a much improved full SCSI hard disc handling. ARGOS 
6.40 now supports the standard IBM AT keyboards, IBM AT extended and 
PS/2 extended keyboards, covering 11 different national languages. 

Now it is possible to use the advanced facilities of any printer, including 
laserprinters, thanks to new user defined extended translation tables. 

ARGOS windiwing facilities are extended to support separate screen 
MODE for each job. 

In addition to PSION Xchange we deliver free of charge 2 discs with 
easy to use menu system and ultlities. 

Present THOR XVI users please register with us in order to request a 
ROM/Software upgrade. Technical support is already available in the U.K. 
through P.M. Engineering. 

Please request the new 12 pages THOR XVI brochure and price list 
containing also a description of the new coming products. We are pleased to 
announce 2 new products: 

* ARCTURUS EDITOR (Arced), the indispensable companion for 
programmers (also running on THOR 8 and Sinclair QL), introductory price: 
GBP £45.00. Please request a technical description. 


London @1- dialling code is changing to @71- or 
@B1- in Moy 1998. If you have a computer based 
address list, we can provide the data you need 
to change your lists, and even a program to 
change text files (eg Psion EXPORT files). 
Disks contain 5 text lists in database import 
formats (quote delimited, etc) & a program for 
text (ie export) file conversion. Also provided: 
IBM PC : or major datobases/sprdshts 
a ion Archive .ddf file 

ATARI ST: The 5 text lists & program only 


QUICK QL REPAIRS 


VAST stock of nents & vorking 

circuit board ensure quick and 

reliable repai Usually same day) 

QLs tested vith Thorn EMI test rig 
and ROM softuare 


(NOV harduare extra if required) 


£25 (6m gntee) 


Much pains filters. 48-88 db cut 
& 3 spike filters. 398 joule cut (3 & 4 vay) 


Certified X/¥ 248uc capaci tors 
2-vay Ga adaptor)... 


3-vay (Sa adaptor) 
4-vay (13a trailing socket).. 


Viewdat a/VIS2/ASCII OL TERMINAL EMULATOR 
Een deluxe communicatieprogramma van Kualsoft 


Multitasking program for electronic mail , 
PRESTEL etc. Phone directories for ALL (yes ALL) 
mans for the OL, autodial (here poss) and 
t FILE TRANSFER to ATARI ST, I8M PC, 
er (via comms Link), wnooen, real 
mer, buffered logs fo le/pr inter 

vd | 


Norvegian options, EOL translates, editor etc. 
SOLVES ALL PackAceD MODEM SOFTWARE PROBLEMS 
Unbuffered modems usable vith Miracle Modaptor 


Software (3.5" or adv) & manual £30 


* C++ COMPILER for the THOR and QL range of products, is under 


pyaar FILE TRANSFER Eatedligent buffered moden with text status 


Dansoft offers software service contracts for existing THOR customers 5. Hayes protocol, porottel. printer 


DA NSOFT Progress to transfer text AND prograns con be used as 6k serial to parallel 


error free CXNODEMD betueen computers inter buffer). 24@vac or 9-12vde. Rutodial/ 
Sole Agent for: 


fai lable for IBM PC and compatibles, creer end sory programmable registers ae 
THOR INTERNATIONAL COMPUTER SYSTEMS I/S 


sree hap owt gy ed a 
ay 22 ee ond 75/1. 
cae 12001200 + tone dingy, 
Raadhusatraede 4 b, 4.sal, DK 1466 Copenhagen K 
Mail to: P.O. Box 59, DK 1002 Copenhagen K, Denmark. 
Phone no: +45 1 930305 (after May 15th: +45 33930305) 
Fax no: +45 1 938292 (after May 15th: +45 33 938292) 


Qualsoft program (per a/c) 
Serial lead ‘name 2 comput 


Complete package for 2 compu! v2 oan to existing model 


it Place, London W2 IRB (tel: Ole? “7t4 ») 


Telex: 265651 (ref: 72:4AG9064S) Prest 


Sinclair/QL World October 1989 45 


MICRODRIVE 


KEY 


B = SuperBasic; A + O = assembler and object code; M + B= machine 
code and Basic loader; A+B+O = assembler and Basic loader and 
object code; S = supercharged; L = QLiberated; f1 = monitor mode; f2 


= TV mode 


1. DIY ASSEMBLER by Giles Todd (B) £5 
A complete two-pass assembler which assembles all 68008 code and 
supports the directives DRG, END, EQU, DC and DS. 


2. MINI MONITOR by Richard Cross (A + O) £3 
Multi-tasks on the QL using only 3K of RAM, Dump registers, memory 
and ASCII mic trace, register store, memory move and store, and 
jumps. QL User, October 1985. 


4. GOLF by Shergold and Tose (Bf12) £2 
Up to 50 courses varying difficulty with lakes, rivers, bunkers and trees. 
QL User, May, 1985. 


5. PALADIN by Williams and Holliday (A + O) £5 
All-machine code space-invaders game used as the basis of the games 
programming series beginning in April 1985. 


7. PACMAN by Steve Deary (B) £1 
Almost 20 screens of varying difficulty including an invisible maze. QL 
User, March 1985. 


8. FAMILY TREE by Andy Carmichael (B) £3 
Archive database for assembling and displaying large family trees. 
Theory of Relativity, QL User, July/August 1985. 


9. COMPOSER by James Lucy (L) £3 
Completed in QL User, October 1985, this QLiberated program allows 
you to compose, play and edit music, including tempo, staccato, legato 
and sharps. 


17. CAD QL by Tony Quinn (S) £4 
The QL is particularly suited to CAD. Includes rubber banding and user- 
definable symbols. QL World, September 1988. 


19. STARPORT 2001 by Karl Jeffrey (M + B) £3 
Galaxian-style arcade game with fast m/c entry. QL World, November 
1986. 


24. DESIGN 3D by J.F. Tydeman (S) £4 
3D screen designs with the minimum of fuss. QL World, March/April 
1987. 


25. STELLARIS by D. Carmona (Bf1) £4 
Real-time space adventure against the computer, including economic 
simulations, lunar landing and superb graphics. QL World, June 1987. 


29. BRIDGE by Peter Etheridge (B) £4 
Excellent version including accurate bidding, automatic or manual card 
play, replay hands, save and load more. 


32. ADVENT2 by Phillip Sproston (B) £4 
Arcade adventure with humour: rooms, robots and problems to keep 
you on your toes. 


34. QLCONVERSION/CALCULATOR (f2) £2 
Weights and measures, conventions and reverse Polish, converts 
anything to anything. Menu-driven, easy to use. 


35. QWHIST by John Wakefield (B) £3 
You play south and the computer plays north against automatic east 
west opponents. QL World, August 1987. 


36. MAIL MERGE by Stanley Sykes (Bf2) £1 
Handy utilities providing mail merge and labeller for Quill files, plus a 
demo. 


37. THE DOUBLE by P.G. Ives (Bf2) £4 
A large football strategy game. You manage a team through four 
divisions, buying and selling, boosting morale through the league and 
F.A. Cup season. 


40. ROULETTE by Santiago Rubio (B) £3 
Spanish/English version of the gambling game, including Leigh Pattern 
system to break the bank. QL World, September 1987. 


45. SUPERBREAKOUT by R. Davidson (M + B) £2 
Fast m/c version of the classic bat, ball and wall game. Optional double 
bats and/or balls. 


52. SPACE PODS by Simon Quinn (M + B) £3 
Your lone ship must protect six energy pods against the aliens. Machine 
code. QL World, December 1987. 


53. GRAPHIC WRITER by S.M. Walker (B) £2 
A graphic design program which can save your pictures as SuperBasic 
commands for use in other programs. QL World, December 1987. 


54. ZAPMAN by LL. Miles (M + B) £3 
Fast-action m/c version of the Pacman genre. Variable skill levels and 
maze formats. 


55. ADVENTURE PLAYTIME by A. Pemberton (B) £3 
An extensive adventure where you must complete tasks for the 
inhabitants of a strange land. Coded messages and hints included. 


56. SPACE INVADERS by Paul McKinnon (M) £3 
Very fast, challenging version of the classic, with ugly aliens and 
protective shields. 


57. SPELLED by Timo Salmi (T) £3 
A complete spelling checker for Quill — list files. 7,500 words 
automatically expandable. Required two cartridges and 512K expan- 
sion. 


58. RADAR by Nigel Ford (B) £2 
You are control, monitoring the skies, checking aircraft, scrambling jets 
to intercept UFOs and shooting down enemy aircraft. 


59. DUNGEONS by Geoffrey Evelyn (B) £4 
As wizard, superhero, megahero or elf you must explore the dungeons, 
fighting monsters and collecting treasure in this one- to four-player 
game. Needs two cartridges and an expanded QL. 


60. SPEEDMIND by William Henderson (B) £3 
A mastermind-style game played with coloured pages. You have 12 
attempts at breaking the code against the clock. QL World, January 
1988. 


61. COMPANDER by A. Quigley (M9) £1 
Compresses screen designs into the smallest files we have seen from a 
similar routine. QL World, April 1988. 


62. DOMINOES by Adrian Steen (Bf2) 
1 version of the classic English dominoes to play against the computer. 
QL World, May 1988. 


63. VICIOUS VIPER by lan Humphreys (B) £3 
A version of the snake game in Basic. “Simple, frustrating, addictive, 
playable.” QL World, July 1988. 


64. TAKTIX by Nigel Ford (B) £3 
Six or more can play the computer in a fierce game of European 
conquest. Put aside at least an hour. QL World, July 1988. 


65. DUAL DOMINOES by Heimo Geske (B) £4 
Two addictive versions of European dominoes with splendid graphics, 
to be played in mode 4 against the computer 


66. FTIDY by Howard Clase (B) £4 
“A very pleasant file handling front-end type program, very clear and 
simple to use” — QL World software editorial. Machine code data file 
handlers Data—maker and Data—loader are included in the package. 
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EXCHANGE 


67. LEAGUE SECRETARY by C.B. Storey (B) £3 
You enter the match results and this program updates the league tables. 
Suitable for any sporting league organised on the lines of the Barclays 
Football League. 


68. TAB—EDITOR by Richard Williams (B,complied) £3 
A flexible text editor for easy entry and manipulation of listings. Includes 
simple movement through columns, full block copying, special SORT for 
tabular listings, and very flexible tabbing. “The author has taken a lot of 
trouble to get it right.” Code available from author. 


69. WORDSEARCH by David Watson (B) £3 
Generates 20-word wordsearch puzzles with large-letter screen dumps 
using the Easel print—prt routine (which must be added by the user). “A 
nice program and different to the usual run of wordsearches.” QL World, 
November 1988. 


70. QTRON by Axel Berle (M + B) £3 
“Although arcade games are not my personal favourite, | liked this one 
— smooth graphics, excellent visually, and plenty of variety to maintain 


interest.” MDX only. 


71. CRITICAL MASS by Patrick Carter (B) £4 
As numbers accumulate in close proximity to each other, they reach 
their critical mass and explode, blowing their neighbours off the board. 
Can you hold your position? “An original game which | enjoyed playing.” 
QL World, December 1988. 


72. BOXES/FOX AND HOUNDS (B) £4 
Two SuperBasic games for the festive season. Keep your family 
amused for hours, get hooked yourself. QL World, January 1989. 


73. MULTIPLICATION TABLES by Ron Allpress (B) £3 
An educational program with plenty of features. Ideal for teaching the 
next generation to memorise the multiplication tables, or revising your 
own. QL World, February 1989. 


74. GRAPH PLOTTER by John Banks (B) £3 
Useful for visualising mathematical functions in two dimensional polar or 
cartesian coordinates. QL World, March 1980. 


75. BUSINESS GAME by David Smith (B) £4 
A business simulator for any number of players, human or computer. 
The winner is the one who makes the most money! Networking 
capability available from author. See QL World, April 1989. 


76. BACKGROUND MUSIC 

By J Russell/CARPET by G.V. Reynes £4 
The former generates music which will play behind another program; 
the latter generates patterns based on one-dimensional cellular 
automata. Lie back and relax. QL World, May 1989. 


77. FOOTBALL MANAGER by Chic James (B) £3 
Guide your teams through the league competing against one another. 


78. CUBE by Dirk de Mal (B) £3 
A2D strategy game in the colour cube tradition — unscramble the cube 
into the correct colour sequence. “Entertaining and addictive” with 
graphics and music. QL World, July 1989 


79. LINK 4 by Graham Creasy/BOING by Richard Green (B) £4 
Line up four counters against an opponent or against the computer. Not 
as easy as it sounds. In Boing, a ball bounces to the force of user- 
definable gravity 


80. MOLECULAR GRAPHICS by Mark Knight(M&B) £4Molecuar 
structures of any compound can be saved, reloaded, drawn and rotated 
on screen. Examples provided. “Excellent, one of the best educational 
programs on the QL.” Disc transfer available. 2 cartridges and 512K 
needed. 


81. CONQUEST by Andrew Pritchard (T) £4 
“Superb graphics with lots of original ideas. The best strategy game I've 
reviewed for QL World.” 


82. WORDBLOK by Phillip Sproston £3 Simple to play, hard to win: 
do you know more words than the computer? infuriating and addictive. 
QL World September /989. 


83. 3D SKETCH PAD by A.D. McGregor £3 
Build wire frame models in three dimensions by manipulating blocks. 
For the unexpanded QL. QL World October 1989. 


ORDER FORM 


No. of programs required pi he 
No. of drives to be purchased pia 
No. of drives sent by you siceaid 
ProgramIDnumbers ///////1/ 


QL Gold Card Number 
(if any) 


Total cost of programs Dist 
Cost of drives (£2 each) Rstcaes 
Sub-total at: 
Post and packing £0.75 

+ 15% VAT Rishi 
TOTAL cc. 
— 10% discount for QL Gold Card 
holder at 
TOTAL TO BE SENT , aes 3 


ORE I EOL ES SEROTEC A EE EEO ee MES meee TS TE BL 


pS” Ee ee area EL  5T Rae, eee a RE Te PLAIN NO ETRE OR te Care 


ON cS Bee te on od hide RL iie iv ecinsedaaduvecnavd aateeedskiauan dekh saulanhd dctwlewnaaauarenneniien 


(BLOCK CAPITALS PLEASE) 


Please copy on to Microdrive the programs which | have indicated by their ID numbers. | enclose a cheque/PO to the value of £ 

payable to Sinclair QL World. | understand that Sinclair QL World undertakes to supply only these programs, copied on to one or two 
Microdrives per title as required, and accepts no liability for operation as defined by the authors. QL World cannot supply information 
about the programs other than that originally printed or supplied. Any article reprints must be ordered and paid for separately at £2 


each (£3 overseas) inclusive of post and packing. 


Please send your order form to Mike McKenzie, PO Box 74, Tonbridge, TN12 6DW Tel: 0892 832952. 
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\y s\) "IT's a Funny Thing” 
\\\\ is a collection of stories, 

anecdotes, witticisms, drawings 

and cartoons with the common theme 


of Information Technology. 


Contributions come from the rich, successful and famous - 

and not. They come from IT users and organisations for 
computer professionals as well as suppliers of hardware and 
software. They are company Chairmen, Managing Directors... 
Consultants, Programmers and Analysts. Some have chosen 
(possibly needed) to remain anonymous. They have given their 
best one-liners, favourite after dinner stories and illustrated 
humour. And they've given freely. 


"IT's a Funny Thing" has been produced at cost all the way 
from the admin, to the artists, to the typesetters, to the printers. 
Nobody apart from The Wishing Well Appeal is making a 
penny. Even the space for this ad has been donated free by the 
publication. 


Buy this book and you won't be the only one smiling. 
With all the Royalties going to Great Ormond Street you'll find 
quite a few children smiling as well. 


Please send copies of “IT's a Funny Thing" at £10 per copy 
Name 


Address 


Post Code 


Cheques should be made payable to "The Wishing Well Appeal” 
and we ask you to allow 28 days for delivery. 

Please complete this coupon and send with your cheque to: 

IT's a Funny Thing, The Wishing Well Appeal, 

C/O Digitus Ltd., 16-17 Clerkenwell Close, London ECIR OAA 


Help Great 


The Wishing Well Appeal pees sy. da 
Great Ormond Street Children's Hospital get better 
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QL MUSIC 


* Produce amazing quality printed music 
* Simple keyboard entry 
* Write and edit tunes of up to 256 bars 


* Easily transposes to any key 
* Fully automatic page design, including 
spacing of notes, joining tails, etc. 
QUALITY OF PRINT MUST BE SEEN 
TO BE BELIEVED! 
S.A.E. for sample and further details to: 


LN. Back, 1 The Chase, London SW4 ONP 


ASSAULT AND BATTERY - A new 
fast-action vertically-scrolling shoot- 
em-up from the author of Spook and 
Deathstrike. Only £10. Cheques to 
KAOS Software, 39 Calbourne Ave- 
nue. Hornchurch, Essex RM12 5BH. 


QL ROMS AND SPARES 


ROMS. MGE (Spanish), MGF (French), MGG 
il JS (English), £20 each. JM (English), 


MDVS. Complete QL MDV Subunit £20. Head and! 
Chassis £10. Microswitch £2. Motor £6. Rubber 
+ Plastic Rolier £2. MDV2 Stand-off spacer + 
screw £2. ULA £5. T 4,5,6,7 set £2. MDV pcb inc. 
ULA £11. Prices include UK postage. Send SAE 
for price list of all QL spares. 


Joe Atkinson, 36 Ranelagh Road, Ealing, 
London W5 5RJ (Mail order only) 


QL EMULATOR 


NEW PRICE — NEW FEATURES 


Emulates QSound — Latest QJUMP Drivers — SuperToolkit I! 
Hotkey System Il- and maybe more 
NEW POINTER ENVIRONMENT PROGRAMS 
Please write for detailed information in English or German! 
BRAIN SMASHER! New Game! You need concentration, 
tactics and nerves of steel. English, German & French. £12.90 
QLOQ — 24 pin printer Utilities Now 13 nice download fonts! 
Download font-editor and font management utility 
QSUP — System Utility Package Most of QSYS | & ||, new 
features and additional things — upgrades possible! 

QD £27.00, ARCANOID £12.00, FIREBIRDS £12.00 


THING & EPROM MANAGER £16.75 and many more... 
Please add £2.00 for p&p! Goods will be dispatched within 2 days! Airmail! 


JOCHEN MERZ SOFTWARE 


IM STILLEN WINKEL 12, 4100 DUISBURG 11, W-GERMANY 


|< Ne Kc U + Ne 


HARDWARE SERVICES 


Adman Services 
0952 255895 


PM Engineering 


0223 420007 


ABC Elektronic 
010 49 521 890381 
Care Electronics 
0923 672102 

Thor International Repairs 


OLs. peripherals. accessories 


MICRO 


PLAY WITH ME (ADULTS ONLY. Dial 
0898 442334 now! (25p/38p per min.) 
We dare you to listen. 

ADULTS ONLY. Dial 0898 442334 
now! (25p/38p per min.) . . . Just 
listen. 


Two new games by Oliver Neef 
FINAL CONFLICT —Non Nuclear War in 
Europe £9.00 FLP £11 MDV 


THE OPEN GOLF — Golf Simulator with 
50, 18 hole courses £9.00 FLP only. 


Both come with manuals and need 
256K + 85 Col Screen recommended 
CGH Services, Cwn Gwen Hall, 
Pencader, Dyfed, Cymru SA39 SHA. 
Tel: 055934 574 


FOR ATARI ST 


NOW ONLY £155.00 


£19.50 
£25.00 


Care Electronics 
0924 672102 


CGH Services 
055934 574 
Adventures, OLAF 


O10 4533 930305 Suredata £ 
O10 4533 937544 (1-902 5218 Compware 
wii i rings, sel 
Digital Precision Repairs 0270 582301 


1-527 5493 Super User Bureau Task Swopper. Mega Toolbox 
Discs, interfaces. drives Support Expert System Shell and others 
keyboards, RAM expansions 0388 450610 

EEC Ltd 0388 450658 Creative Codeworks 

0753 888866 QL World 021 426 5199 


Speedscreen 


Abs 


Tony Tebby software. Miracle 
hardware, peripherals, utilities 


Miracle Systems 

0904 423986 

Trump Card interface, modems 
hard disc drive 

PDQL 

O21 200 2313 

Memory extension, disc drive 
Z-88. printer 


QJump 


(Tony Tebby) 
0954 SO800 


Schon PCP 

04865 3836 

Keyboards, utility software 
Strong Computer Systems 
(267 231246 

Interfaces, peripherals 

Sector Software 

0772 454328 

Peripherals 


TF Services 

(1-724 9053 

Repairs, spares, peripherals 
TK Computerware 
OMIA KI2K01 


(reader services) 

TIL. O892 834783, UR92 832952 
Subscriptions. back issues. 
Microdrive Exchange 


Quanta 

User Group. support 

Hon. secretary. Phil Borman 
(472 49850 

Xchange User Group 
Freepost 

Beckenham 


Kent BR3 2BR 


SOFTWARE 


Athene Consultants 

U708 511439 

ARK Distribution 

(YRS 7H496 

Archivist. Master Spy and other 
business and utility software 
Byteback 

0636 79097 

Call Us What You Like 
5§ Greenan, Shaws Road. Belfast 
BTI1 SLX. No telephone 
Superspy 
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Digital Precision 
01-527 
Turbo Basic compiler. Desktop 
Publisher. Editor, Eye-QO 
graphics, Sprite generator, Super 
Forth, Better Basic, Professional 


$493 


and Super Astrologer. Media 
Manager. Supercharge 
Blocklands, Driodzone, Aracadia 
Reversi, Backgammon, Master 
Bridge Tutor, C-M Emulator. € 
compiler. Lightning speed 
enhancer 


DJW Software 
0256 881701 
Home Banker 


Eidersoft 

089283 2552 

Games, utilities, Ice. 
Pyramide 


ImaQLate Software 

42 Albion Street. Broadstairs 
Kent CTI0 INE 

Biograph 


FOR SALE: Sinclair QL with trump 
card, twin NEC disc drives, 
monitor, Centronics adaptor, loads 
of professional software. £450 ono. 
Tel 0934 621343. 


Thinking of asking the boss for a rise? 
Planning to buy yourself a new car? 


Rit) 
Working up the energy to redecorate the house? | I 1 c IP M 


Whatever you're doing get some help with... 


QL REPAIRS 


ANY FAULT £27.95 INCLUSIVE OF P&P, VAT 
INSURANCE AND 3 MONTHS GUARANTEE. 
FOR REPAIRS ON OTHER MICROS 

PHONE FOR DETAILS. 


SUREDATA 


Telephone: 01-902 5218 


THE ORACLE 
FORTUNA 


SOFTWARE WITH A DIFFERENCE 
32 questions each with 32 answers to put 
to the Gods about your future. 

DARE YOU ASK THE ORACLE? 
Only £14.95 to 
a nea 1 SOFTWARE 89, 
, Is-y-Llan, Llanddarog, Carmarthen, 
Dyled, South Wales, SA32 8NX. 


FLUTTER. All the excitement of a 
flutter on the Stock Exchange. A 
game for 1 to 4 players, £9.95 MDV. 
1.D. Games, 48 Pegholme Drive, 
Otley, W. Yorks. Tel. 0943 466352. 


UNIT 6, STANLEY HOUSE 
STANLEY AVENUE, WEMBLEY 
MIDDX. HAO 4JBQ 


THE ULTIMATE BIORHYTHM 
PREDUCTION PROGRAM! 


> So easy to use and so much fun too 
> Monitor your highs and lows with total ease 
> Selectable one month or six month displays 
> Analysis for any day of any month in any year 
> Personal compatibility profile — very revealing! 
> Full printing of screens and analyses 
> An invaluable aid to business efficiency 
> Excellent introductory manual and FREE book 
“It is slick, neat, fast, easy to use and well laid out” 
QL World review — March 1989 
All orders will receive immediate attention — positively no delays. 
Just send £20 Sterling by cheque or postal order to: 


imaQLate software 
42 Albion Street, Broadstairs Kent CT10 1NE 
Get the most out of every day with BlOgraph 
— The Program you'll never stop using. 


PDQL 


021 200 2313 

General business and utilities 
applications, including DiscOver, 
Cash Trader 


QL Supersoft 
0256 475992 
Home Budget. Superdraw 


Rob Roy Software 

94 Teignmouth Road. Clevedon 
Avon BS21 6DR 

Rob Roy and Palantir 


Sector Software 

0772 454328 

Flashback and other utilities 
Peripherals 


SD Microsystems 


0462 675106 

Low-cost business and practical 
programs including the Small 
Traders’ Pack 


Software 87 

33 Savernake Road. London NW3 
pal 

Text 87 


Talent Software 
0303 S1L3KR3 


Uuilities. games 


Thornado Systems 
O10 062 577244 
Thor systems. software. support 


TK Computer Systems 
(93 924 621 


Add-ons, spares. software 


WD Software 


OS34 81392 


MICRODRIVES MICRODRIVES 


LIMITED NUMBER OF CLEAN 
DE-LABELLED, USED ONCE 
CARTRIDGES £3.45 FOR FOUR — 
INCLUDING POST & PACKING 


Cheques/PO’'s to: 
VI. JENKINSON, 
BEAUSITE HOUSE, MEADOW LANE 
OVER, CAMBRIDGE CB4 5NF. 


SUPERTRACE 


Watch Basic in action plus single step 
mode “indispensable”. The most 
reasonably priced tool released (see 
August ‘87 QL World on MDV). 


£5 including p&p 
STACK SOFTWARE 
Great Wolford, Shipton on Stour, 
Warwickshire CV36 5NQ. 


Tel: 0608 74369 


QL ADVENTURES FORUM # 7 
QL TECHNICOL REVIEW # 1 
Available Now £1.20 each — 
Subscription £5 for 4 issues 
QL Adventures Forum 1, 6 stil! available 


D-DAY MARK 2 
Special Edition £13 FLP £16 MDV (needs 
256 K+) (£2.00) to up grade from: 
D-Day Mark 2, CGH Services 
Cwn Gwen Hall, Pencader, Dyfed, 
Cymru SA39 SHA. Tel: 055934 574 


THE FUGITIVE 


Text Adventure 
Not Friendly — Not Flashy — Not Easy! 
£9.95 
State MDV/3.5 DD Disc 
ACCESS/VISA ORDERS 
TEL 01-654 8329 
CHEQUES/PO.s 
DI-REN 
43 DAVIDS ROAD, FOREST HILL, 
LONDON SE23 3EP. 
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FlashBack 
Special 
Edition 


- for the expanded QL and CST Thor 


After months of blood, sweat and tears, a massive effort 
by ace machine code ton prt Peter Jefferies, technical 
system support by Dilwyn Jones and Chas Dillon, we are 

elighted to announce an entirely new version of Flash- 
Back, FlashBack Special Edition. 


FlashBack Core System 
By Peter Jefferies 


Peter has re-written FlashBack introducing a host of im- 
provements and extra features, only a few of which can 
be listed here due to constraints of space. 


Now written entirely in re-entrant hand coded assembler. This 
means that you can now use multiple copies of Flashback SE at 
any one time and transfer details between files. 


Much slicker screen handling, faster scrolling etc. 
Separate Group and Order (Index) commands provided 
Successive record selection (Grouping) now supported 

Six options of file indexing now available: these include 
number handling (leading zeros optional) 

New powerful string match update from View screen 
Saving of selected subset of current file to disc/Mdv 

Two types of search and replace supported. One lightning 
fast, the other allowing on screen step-by-step consent 
New ‘quit program’ facility provided 

Edit line (Search, Group, Read etc.) greatly improved 
Ad-hoc record selection/rejection on subsequent Groupings 
Many quick-key presses for next, back, repeat search etc. 
Entirely compatible with existing Falshback files 
Compatible with Qram 


New extended config program 
By Peter Jefferies 


Greater choice of turn on key and variations of record 

separator to printer. 

@ New extended import program 

@ extensively modified by Chas Dillon. 

@ More flexible when reading in Archive files, allows sub 
record definition at import and mistakes, restart option etc. 


Report Generator 


Planned by Chas Dillon Written by Dilwyn Jones 


This is the feature that hordes of existing users have been 
screaming for. 


The report generator provides flexible printer output from a 
FlashBack file. Allows columnar printing of details, labels, 
mailmerge, document and invoice production etc. Includes 
printer driver and installation utility which allows for additional 
fonts and 10 translates. 


@ sector price Only £40 


FlashBack Special Edition will be available in April.Standard FlashBack 
will continue to be available at only £25 inclusive. 

Upgrades for existing FlashBack users 

Send your FlashBack master and £15, mark your envelope ‘FlashBack 
Upgrade’. You may upgrade from Microdrive to disk. Make this clear 
or you will receive the upgrade on the same media as you send. 
Demand will be high and orders will be dealt with in date sequence. 
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Phillips CM8833 
Stereo Monitor 


A dark screen monitor with composite video, RGB 
linear and RGB TTL inputs. 

Plainly speaking it is a very good monitor that is well suited to 
the QL or any other computer. The monitor has a green 
screen button to convert from colour to green screen and 
back again at the press of a button. It can handle all 4096 
colours available on the Amiga and has full stereo sound 
output through its two built in speakers. Not much use on the 
QL, but if you change computers this monitor will work just 
as well with your new one. The Phillips CM8833 is the same 
price as the Discontinued Microvitec QL monitor, but is 


much, much better. 
~ RRP-£3-0.0_ 
& sector price £260 


Ferret LR 


Ferret is a new utility that hides in 

the background until needed. When you 

can’t remember the filename of the doc or pro- 
gram that you were working on. You simply call 
up ferret and send it looking for the file by giving it 
a clue about the content. 

If you wrote to Quanta then simply type ‘Quanta’ and tell 
Ferret where to look. It will fly through your disk or Mdv and 
read all the files, looking for a match. Any file that contains 
the search text is named and the the file contents around the 
match are shown to you if required. 

The program searches only specified files, e.g. doc or _bas 
and will either search the whole file for a match or will just the 
first 1-5K of it. This can be used by leaving notes in the 
header of a Basic program which can subsequently be 
searched for. 

Ferret is designed to be quick and easy to use and will:-work 
on all QL’s and memory sizes. It comes on 3.5" disk or 
Microdrive and is a must for anyone with an extensive disk or 
May collection. During searching the filename is displayed 
together with the file size - you can see the program working. 
The next time you can’t find a file don’t waste time looking 
for it, just send your ferret after it. 


@ sector price £12 


Star LC 10 Colour 


The new Star LC10 colour printer is an 8 column 
printer that works superbly with the QL. 

The 8 colour ribbon only costs £6 to replace - less than the cost 
of black ribbons for some printers. The colour commands are 
easily implemented - simply type “((C))” followed by the 
colour number required. The LC10 colour has 6 NLQ fonts all of 
which give excellent output. 


@ sector price £274 


Sinclair/QL World October 1989 


920ST-FM SUPER PACK 


ARCADE GAMES 


Arkanoid II Imagine £19.95 
Beyond The Ice Palace Elite £19.95 


Black Lamp Firebird £19.95 
Buggy Boy Elite £19.95 
Chopper X Mastertronic £9.99 
kari Warriors Elite £14.95 


Marble Madness Electronic Arts £24.95 


ST COMPUTERS 


Quadralien Logotron £19.95 

Ranarama Hewson Consultants £19.95 The range of Atari ST computers offers something for everyone. From the games enthusiast 
Return To Genesis Firebird £19.95 who wants the challenge of the very best in arcade action, to the businessman who wants to 
Roadwars Melbourne House £19.95 make financial forecasts or faultless presentations. The ST offers high quality graphics. 


sound and speed for the gamer, whilst providing a fast, user friendly and affordable solution 


a meri ooree to business. The ST is now firmly established in the home environment and boasts a wealth 

n ¥ of users in education, local government, television, and a variety of different businesses 
Thrust Firebird £9.95 Tf software for the range stretches to cover applications as diverse as ENTERTAINMENT 
Thundercats Elite £19.95 ff aCCOUNTS, ART, COMMUNICATIONS, COMPUTER AIDED DESIGN, DATABASES 


Wizbail Ocean £19.95 
Xenon Melbourne House £19.95 
Zynaps Hewson Consultants £19.99 


SPORTS SIMULATIONS 


The Atari Super Pack is ideal for you it you want to get off to a flying start Eddie Edwards Super Ski Elite £19.95 a 
with the best in entertainment software. The Pack includes a 520ST-FM Seconds Out Tynesoft £19.95 
with Mb RAM, a built-in 1Mb disk drive, over £450 of top games and @ Summer Olympiad '88 Tynesoft £19.95 WITH BUILT-IN 1Mb DISK DRIVE 


joystick. If you buy the Super Pack at Silica Shop, we will add our own ST 


Starter Kit (worth over £200), Free Of Charge Return the coupon for details PRODUCTIVITY SOFTWARE 
Organiser Triangle Publishing £49.95 


JOYSTICK 
Atari CX40 Joystick AtariCorp £4.99 


FREE ATARI BUNDLE VALUE:£458.97 
With SC1224 colour monitor: £698 v5 


DESKTOP PUBLISHING, EDUCATION, MUSIC, PROGRAMMING, SPREADSHEETS, WORD 
PROCESSING and more. For a full list of the software available, as well as details of the ST 
range, complete and return the coupon below All prices correct at the time of going to press E&OE 


With SM124 mono monitor: £498 is 


NOW WITH TV MODULATOR 


For the serious home user and the small business, we are 
pleased to announce a new package based around the 
1040ST-FM. The 1040ST-FM has 1Mbyte RAM and a 
Mbyte built-in disk drive. In addition, the 1040ST-FM 
now comes with a TV modulator built-in. (The previously 
available 1040ST-F was designed for use with a monitor 
only and did not come with a modulator.) This modulator 
allows the 1040ST-F to be plugged directly into any 
domestic TV set, and comes complete with a lead to 
allow you to do so. The new ‘Professional Pack’ from 
Silica includes the new 1040ST-FM with modulator plus 
four high quality software packages including a spread- 
sheet, database, word processor and programming lang- 
uage. This ‘Professional Pack’ software will enable you to 
get straight down to business with your new computer. In 
addition to this software (worth £384.84), if you buy the 
Professional Pack from Silica Shop, you will also receive 
the Silica ST Starter Kit (worth over £200), Free Of 
Charge. Return the coupon for further information 


The value for money offered by the Atari ST range is reflected in the Explorer Pack 
featuring the 520ST-FM computer with 512K RAM. The 520ST-FM, computer now 
comes with a built-in 1 Mb double sided disk drive as well as a free mouse controller 
and a built-in TV modulator. The new 520ST-FM Explorer Pack includes the 520ST- 
FM computer, the arcade game Ranarama, a tutorial program and some useful 
desktop accessories. In addition, if you buy the Explorer Pack from Silica, we will 
give you the Silica ST Starter Kit worth over £200, FREE OF CHARGE. Return the 
coupon for details of our Starter Kit and of the full ST range 


£260 


+ SM124 mono monitor: £398 ‘5 + $C1224 colour monitor: £598 {A$ 


ATARI 1040ST-FM (Computer) £499.99 
VIP PROFESSIONAL (Spreadsheet) £149.95 
MICROSOFT WRITE (Word Processor) £149.95 
SUPERBASE PERSONAL (Database) £59.95 
BASIC DISK & MANUAL (Language) £24.98 


; INCLUDING VAT _ NORMAL RRP: £884.82 
With SM124 mono monitor: £598 5 | LESS DISCOUNT: - £385.82 
With SC1224 colour monitor: | £798% PROFESSIONAL PACK PRICE: £499.00 


Before you decide when to buy your new Atari ST | SILICA STARTER KIT: Worth over £200. FREE 
computer, we suggest you consider very carefully WHERE | with every Atari ST computer bought from Silica 
2Mb & 4MbD MEGA ST yeas he | paresegNAl PK en se 
you a computer, a few peripherals and the top ten selling | with 1040ST-FM and MEGA ST's bought from Silica 
titles. There are FEWER companies who can offer a wide . 
The MEGA ST computers are styled as as lightweight keyboard with a separate CPU rarigy of paodkicks' lor your compiler ahead sides (ete nee ee 
connected by a coiled telephone style cable. There are two versions of the MEGA ST and help when you need it. There is ONLY ONE rg : cing 
one with 2Mbytes of RAM and the other with 4Mbytes. Each version has a 1Mbyte company who can provide the largest range of Atari ST | 7HE FULL STOCK RANGE: A\i of your Atar 
double sided disk drive built-in to the CPU unit. The MEGA ST's do not come with related products in the UK, a full time Atari ST specialist requirements from one place 
modulator built-in and must therefore be used with a monitor. With every MEGA ST technical helpline and in-depth after sales support, inc- | AFTER SALES SUPPORT: The statt at Silica are 
purchased, we will add the ‘Professional Pack’ software (worth £384.83) detailed luding free newsletters and brochures delivered to your dedicated to help you get the best from your ST 
above, plus the Sil door for as long as you require after you purchase your | FREE CATALOGUES: Mailed direct to your home 
ica ST Starter Kit computer. That one company is Silica Shop. We have | 5 S00N as we print them, featuring offers as well 
(worth over £200) been established in the home computer field for ten years | 95 3!! of the new releases 
both Free Of Charge with an annual turnover in excess of £8 million and can | FREE OVERNIGHT DELIVERY: On all hardware 
Return the coupon *+MoOno monitor=£998 | +mono monitor=£1298 now claim to meet our customers requirements with an | Ofders shipped within the UK mainland 
for further details +colour monitor=£1198 | +colour monitor =£1498 accuracy and understanding which is second to none. | PRICE MATCH PROMISE: We will match comp 
But don’t just take our word for it. Complete a urn | etitors on a ‘same product same price’ basis 
the coupon below for our latest literature and to | FREE TECHNICAL HELPLINE: Full time team of 


experience the Silica Shop specialist Atari service Atari technical experts always at your service 


DIP PageStream £149... 


Desktop Publishing (DTP) is one of the fastest growing applications for personal | * TEXT-FLOW AROUND GRAPHICS 
computers. We are pleased to announce a powerful low cost package for the Atari ST | * ROTATION OF TEXT & GRAPHICS 
called PageStream. PageStream costs only £149 (+VAT=£171.35) and, because it | * SLANT OR TWIST ANY OBJECT 
works with an Atari 1040ST and a Seikosha SP-180A/ printer, you can be up and | * POSTSCRIPT COMPATIBLE 
running with a complete system for less than £1000. Some of the features of | * TAG FUNCTION 

PageStream are listed to the right. If you would like further information on this | * AUTO/MANUAL KERNING & HYPHENATION 
program, complete and return the coupon below, ticking the ‘DTP’ box in the corner. * GROUPING OF OBJECTS 


| 1 Shop Ltd.. Dept QLW 10 89. 1-4 The Mews, Hatherley Road. Sidcup. Kent DA14 4DX 
if you already own an Atari ST computer and would like to be registered on our mailing list as ar PLEASE SEND FREE LITERATURE ON THE ATARI ST 


WITH EVERY ST - RETURN COUPON FOR DETAILS 
ALL PRICES QUOTED INCLUDE FREE UK DELIVERY 


ST user, let us know. We will be pleased to send you copies of our price lists and newsletters 
FREE OF CHARGE as they become available. Complete the coupon and return it to our Sidcup 
branch and begin experiencing a specialist ST service that is second to none Mr/Mrs/Ms Initials Surname 
Address 
SIDCUP (& Mail Order) 01-309 1111 
1-4 The Mews, Hatherley Road, Sidcup, Kent, DA14 4DX 
OPEN: MON-SAT 9am - 5.30pm LATE NIGHT: FRIDAY 9am - 7pm 
LONDON 01-580 4000 
52 Tottenham Court Road, London, W1P OBA 
OPEN: MON-SAT 9.30am - 6.00pm LATE NIGHT: NONE Postcod 
$$ ostcoge 
LONDON 01-629 1234 ext 3914 
Selfridges (1st floor), Oxford Street, London, W1A 1AB Do you already own a computer DTP oO 
OPEN: MON-SAT 9am - 6.00pm LATE NIGHT: THURSDAY 9am - 8pm If so, which one do you own? 


x Computer snopping Is tun at 
opper Show! 


the Computer Sh 


Yes, for three exciting days in 
November, Computer Shopper will 
turn Alexandra Palace into the 
world’s greatest computer show. 
Everything you need for business 
and leisure computing will be 
available under one roof — with 
experts to help you make the right 
choice! 


The Computer Shopper Show is your 
chance to meet the dealers with the 
bargains, the manufacturers with the 
latest machines — and to take away 
the things you buy on the day! 


Auctions, demonstrations, 
competitions . . . everything that 


you've ever wanted from an - ii 
oe _ P | Yes! Please send me my tickets for the Computer Shopper Show! 
exhibition will be happening at the ' £ 
' 
Computer Shopper Show - the only 1)___Adult tickets at £3 (Save £1!) 
; 11)___Under 16s tickets at £2 (Save £1!) 
show for the direct buyer and the {J _ Family tickets - admits up to 2 adults 
ultimate computer shopping ' and 2 children - £9 (Save £5!) - ‘ 


|| would like to pay by - 
i Cheque made payable to Database Exhibitions Ltd 
13 Credit card “dAccess J Visa Expiry Date 


experience! 


And, with Computer Shopper you 


know you'll save money! ' 
5 Signed 


' 
' Name 
' 


Why not start right here! By ordering 
your tickets in advance you will save 
f£££s! Simply complete and return 
the coupon with your payment or ' nage 

. . ; Please return your completed order form to - 
telephone the Credit Card Hotline on | The Computer Shopper Show Ticket Office, Database Exhibitions 
051-357 2961 to place your order. "Ltd, PO Box 2, Ellesmere Port, South Wirral L6S 3EA 


TELEPHONE HOTLINE 
Place your orders for tickets by calling 


Oo51-357 2961 


' Address 


Prestel or Microlink 

To place your order by Prestel, Key +89, then 614568383. Microlink users 
should key 72:MAG 001. Please quote your credit card numbers and 
your full name and address when you place your order. 


* 


I * Over 250 stands serving every 


1 No. | | | we Ss 


Organised by 


The 
Computer Shopper 
Show 
Alexandra Palace, London 
10am-6pm_ Friday, November 24 
10am-6pm Saturday, November 25 
10am-4pm Sunday, November 26 


major make and model — the 
ultimate computer hypermarket, 
packed with pre-Christmas 
bargains and offers. 

Incorporates the Amstrad 
Computer Show, the Atari 
Computer Show, the Electron & 
BBC Micro User Show and much, 
much more! 

On-site car parking for hundreds 
of cars — ideal for taking away 
your computer bargains on the 
day! 

Excellent public transport network 
with courtesy coach link to the 
local British Rail station. 

Special show features and 
entertainment to make your 
shopping experience fun! 

Special discount tickets for under 
16s and family groups. 


SOWA 


Sponsored by = Jor PER) 
SrJoF 


DATABASE 
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